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EXECUTIVE SUMMARY 


This document contains a full description of the research 
conducted at the University of Louisville over the past year. 

The purpose of this research was to enhance and debug the 
current Performance Management System (PMS) for the UNIVAC 
1100/82 at the NCC, and to extend PMS to operate on other 
computers at the NCC, 

PMS provides a semi-automated system for generating 

monthly performace reports to NASA and contractor management. 

These reports summarize the activity of the operations partition 

1 

of the UNIVAC 1100/82 at the NCC. This is the computer which 
supports TDRSS operations. The reports present tabular and 
graphical data showing such parameters as CPU utilization, 
memory utilization, and TIP thruput. These graphs and tables 
are accompanied by textual explanations. 

Technical and administrative managers use the PMS reports 
to track the system's workload (for example, observing the 
change in workload during a shuttle launch) , to anticipate 
system problems (for example, excessive utilizations which might 
threaten the system's reliability), and plan for system upgrades 
(for example, by observing which system resources are heavily or 
lightly used) . 

A PMS operator (currently from Bendix) must devote one to 
two days a month to perform uhe tape manipulation operations and 
report generation functions required by PMS. More time may be 
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required if system anomalies require research to explain the 
behavior in the PMS report, or if system malfunctions require 
special data recovery procedures. 

During this research, PMS was debugged, and there are now 
no known instabilities in PMS. Furthermore, PMS was enhanced 
making it simpler, more reliable, and faster for the PMS 
operator. In particular, PMS now uses fewer tapes and is menu- 
driven. The current version of PMS is called PMS1R16. It is 
available in the NCC tape library on tape number 0754. 

In order for PMS to be operated by personnel other than 
teh developers at the University of Louisville, it was necessary 
to fully document its features. Therefore, the following three 
manuals hve been generated under thio contract: 

Installation, Operation, and Maintenance Manual 

Program Reference Manual 

File Reference Manual 

Copies of these manuals have been delivered to the Technical 
Officer for this contract and the PMS operator at Bendix. 

Other copies are archived at the University of Louisville. 

PMS is currently in operation at the NCC, and it should 
continue to provide useful information to management for years 
to come. 

PMS 2 was developed under this contract to extend PMS to 
operation on the backup partition of the 1100/82 and the 
development computer at the NCC, a UNIVAC 1100/80A. This new 
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^ PMS version is more general than the one in current operation, 

j It monitors more system parameters and provides a more "generic" 

report. By reconfiguring system data files (not programs) it 
[ can be made to operate on any of the three UNIVAC 1100 

. configurations at the NCC. PMS 2 has been tested, and has been 

' shown to produce usable reports, but i-: has not been approved 

| for implementation on the NCC computers. The University of 

Louisville PMS researchers recommend that steps be taken to 

' 

[ approve and activate PMS 2 for implementation on all the NCC 

UNIVAC 1100 series computers. It should provide the superior 
^ performance reporting capability for all these computers that is 

now provided only for the operations partition of the UNIVAC 
1100/82. 

I There were no inventions developed under this contract. 

There were no subcontracts which contained Patent Rights or New 
Technology clauses. 
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1. INTRODUCTION 

1.1 Statement of Problem 

Under the extension of the National Aeronautics and 
Space Administration (NASA) Contract NAS5-26504 with the 
University of Louisville, the maintenance and further 
development of a semi-automated Performance Management 
System (PMS) was undertaken for the Network Control Center 
(NCC) of the Tracking and Data Relay Satellite System 
(TDRSS) . PMS analyzes the major resources and system 
workloads of the NCC computer, a Univac 1100/82. The PMS 
system prepares and prints monthly reports documenting the 
performance of NCC's UNIVAC 1100/82. 1 it was desired 
by NASA that PMS's manual operations (the procedures 
required to produce the monthly reports) should be enhanced 
for smoother operation of PMS. The contract also required 
that PMS be extended so that it could evaluate all the NCC 
UNIVAC 1100 series computers at the NCC. This report 
describes in detail the enhancements and modifications 
performed on PMS to meet these requirements. 

1.2 Background 

Performance evaluation, the determination of how 
well a system is able to complete its specified tasks, is 
essential to the successful application of virtually every 
technology. System designers, installation directors, data 
processing and corporate members, system analysts, program 
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managers, and computer users at all levels have to cope with 
problems that could be solved substantially more easily and 
more satisfactorily with some knowledge of performance 
evaluation methodologies, techniques, and tools . 2 

All computer systems have to address problems that 
require considerable involvement in performance evaluation 
activities. For example, configuration design, system 
tuning, upgrading, scheduling, operation's management, and 
short and long term planning are important aspects involved 
in a computer system. As is the case with the NCC, the 
increasing complexity of modern computer systems, the 
increasing significance of tasks being delegated to 
computers and future upgrading to their system, have 
necessitated that computer system performance become an 
important consideration for their developers and those 
responsible for system operation . 2 

To analyze the performance of any computer system, 
the productivity, responsiveness, and utilization of the 
system must be quantified into a set of indices to be 
compared with performance standards. Methods used to 
determine these indices fall within three categories: direct 
measurement, simulation, and analytical techniques. Direct 
measurement uses monitors that sum events as they occur in 
the system and convert counter values to indices. Hardware 
or software monitors may be used. Hardware monitors use 
probes connected to the computer while software monitors are 
usually incorporated in the computer's operating system and 
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run concurrently with application programs, simulation; the 
second method of evaluation, uses system specifications, 
information collected by monitors, or both to model the 
system's hardware and its workload. A simulation program 
which uses these modeled parameters imitates the system by 
reproducing a sequence of events which corresponds to actual 
events taking place in the system. A third method of per- 
formance evaluation using analytical techniques represents 
a system by a set of mathematical equations. These equa- 
tions are developed using Markovian queuing network theory 
or operational analysis. ^ 

All three performance methods have advantages over 

each other. Direct measurement is the most accurate, but 

requires an operational system. The system's hardware and 

software must be in the final stages of development. 

Simulation requires development of complex programs to 

simulate the target system. These programs take time to 

develop and debug, but they do not require the target 

system to be developed. Because the system's operation is 

imitated, simulation can produce results which are 'almost 

as accurate as direct measurement. Analytical techniques 

may produce results quickly, and such techniques are easily 

changed in response to system changes. They are usually not 

as accurate as simulation or direct measurement. 

Performance indices for a system and modification 

assessments that can be produced quickly are useful for 

5 

efficient system management. 


All three performance evaluation methods were used 
to evaluate the NCC computers in previous research at the 
University of Louisville under contract NAS5-26504. Chief 
responsibility for development of measurement methods, 
simulation, and analytical system modeling was undertaken 
by J. G. Darnley, G. G. Crush, and A. M. Long tively. The 
measurement methods gathered all the data from the NCC's 
computers necessary to perform the simulation and modeling 
experiments. The monitor used to gather this in- formation 
is called Software Instrumentation Package (SIP) . SIP 
accumulates and records most of the .activities of the 
UNIVAC' s operating system and hardware devices. Because 
data collected by SIP require very large files, data 
reduction programs were developed to reduce the SIP data 
into useable formats and also to produce performance 
summary reports from the UNIVAC 1100/22 then installed in 
the NCC. At this point, simulation and modeling programs 
analyzed the data-base created by SIP/PAR to evaluate the 
TDRSS network.® As a result of the application of the 
above methods, it was deter- mined that the UNIVAC 1100/22 
used by NCC for TDRSS activity was inadequate, but an 
upgrade to an 1100/82 model would suffice. ^ 

An outgrowth of the above research was a proposal 
to use the measurement methods to monitor the operations 
partition of the new UNIVAC 1100/82 and report on its 
performance. A system needed to be developed to obtain 
detailed analysis of the data-base that could be obtained 
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from SlP-collected data and il'AR reduction of it. This 
system would be run periodically and would produce reports 
on the current status of the NCC f s computers could be 
included in this new system, it was desired that the 
reports produced could be used by management, as well as 
technical specialists. The members of the team that 
designed the performance management system for the NCC were 
R. D. Shelton, T. G. Cleaver, A. M. Long, M. Shive, L, B. 
Drake, and A. B. Shah. 8 

The NCC 1 s computers are a part of an extension to the 
existing Ground Spaceflight Tracking and Data Network 
(GSTDN) which is responsible for communications with low 
orbiting NASA spacecraft. To increase the satellite 
communications and coverage significantly, the TDRSS was 
designed because user satellites were frequently out of 
communication with any ground station. Another major 
advantage of TDRSS is that more modern technology is used 
than with STDN, so that a wider range of communication rates 
is provided. The Network Control Center controls and 
monitors are a part of the TDRSS system. The NCC has front 
end processors (FEP) which are UN1VAC Varian 77 600 
minicomputers, and a custom digital TV (DTV) system which 
drives operator workstations. The NCC is built around a 
UNIVAC 1100/82 mainframe computer with dual processors that 
normally runs as a partitioned system, one processor for 
operation and the other for testing. There is also a UNIVAC 
1100/80A mainframe computer used for software development. 
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The PMS system was developed Cor the NCC which is located 
at the Goddard Spaceflight center (GSFC) 

Throughout 1983, PMS was developed by the University 
of Louisville design team, and in October 1983, it was 
delivered to NASA/GSFC as an operational system. Below is a 
brief discussion of PMS as configured on that delivery date. 

More detail is available in the Final Report for 1983 (see 
bibliography) . 

The PMS system was broken down into seven modules. 
The first module which needed to be accessed when generating 
a performance report was the Manual Operations Module (MOM) . 
This module prompted the PMS operator for information, such 
as the operate r ft name, report date, report period, and 
threshold values. Also, MOM set up the major units of PMS 
for execution. • 

Data elements were stored intwo classed of files: 
Internal Data Base and 'the External Data Base. The Internal 
Data Base contained all data files required during a run of 
PMS. The External Data Base contained the PMS system files 
that were stored on magnetic tapes, including the trend 
files. These trend files contained daily averages for 
parameters such as the NCC workload, CPU utilization, memory 
utilization, and utilization of the busiest disk drive. The 
Archive Module (ARM) automatically interfaced PMS’s Internal 
Data Base and External Base. 

The Data Reduction Module (DRM) reduced SIP 
performance data collected during the month. Raw 
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performance data was collected continuously by SIP and was 
written to data files as blocks of raw performance data 
every thirty minutes. A PAR program reduced the data 
collected from SIP, then created the Consolidated Data Base 
(CDB) files* The CDB files contained performance data for 
an entire report period* These data were chronological, and 
if data were missing for any time period, flags were 
provided. ^ 

The Report Generation module produced the monthly 
performance report. (See the Installation, Operation, and 
Maintenance Manual, Appendix I for an example of a typical 
report.) Two tables were contained in this report: Busiest 

Day Summary and Daily Average Report. The Daily Average 
Report gave a summary of daily performance averages during 
an entire month. The Busiest Day Summary table reported on 
the busiest day during the report period. This day could be 
specified by the PMS operator. 

There were scatter plots in the monthly report for 
CPU, memory, and disk utilization. These scatter plots 
showed how the major resources relate to each other. Trend 
graphs were contained that reported on the NCC's CPU, 
memory, and highest disk utilization during the report 
period. Conditional reports were automatically plotted if 
threshold values were exceeded. These values were manually 
set by the PMS operator in the Manual Operations Module. It 
was possible to plot up to 25 conditional reports. 

A Performance Monitor Module (PMM) along with MOMPOl 
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allowed the PMS operator to start and stop the PMS software 
at various stages when generating the monthly report. This 
was helpful when testing and debugging the PMS system. When 
data integrity errors occured when executing PMS, the PMM 
would stop execution and provide error statements for 
unrecoverable errors. 

The Maintenance Module (MAM) made it easier for the 
PMS operator to maintain the PMS system. This included 
maintenance of command files which compile and link 
programs. The PMS monthly performance report and the system 
programs could be printed on the UNIVAC's line printer by 
executing the appropriate command files. Also contained 
were PAft programs that enabled the operator to determine if 
a SIP cycle file could be reduced by PMS. 

PMS was not a general system and would only evaluate 
NCC's UNIVAC 1100/82 operations partition. PMS could not 
reduce data from the backup partition of the UNIVAC 1100/82 
or a UNIVAC 1100/80A computer. As of December, 1983, PMS 
would reduce Software Instrumentation Package (SIP) cycles 
properly and produce a satisfactory monthly performance 
report as described. PMS required at least four magnetic 
tapes: a system tape, two trend tapes (one used for the 
purpose of positioning the other one) and a SIP tape or 
tapes. Data copied on the SIP tape was collected using the 
Software Instrument Package, located on the UNIVAC 1100/82. 
The data collected required reduction of large amounts of 
performance data which would eventually be used in the PMS 
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monthly performance report. The trend tapes contained 
reduced performance data from the previous three months. 

The system tape stored all programs and maintenance routines 
contained in the PMS system. PMS required a minimum of 
human input to generate a monthly report. PMS was designed 
modularly to help with debugging and future modifications to 
the system. 

The modular design of PMS helped limit the size and 
functions of all its software routines. The modules and 
units were designed with minimum interface between each 
unit. This allowed for changes to be made to the system by 
changing small programs instead of large ones. Ease of 
future develpments to PMS was increased because of the 
flexibility designed into the system. 

1.3 Preview of Report 

The following text will describe the major 
modifications made to the PMS system, in the first section, 
the design methodologies used by developers of PMS are 
discussed. Then bugs found in PMS and enhancements made to 
PMS are discussed. Finally, the development of the new 
general version of PMS, which runs on all NCC 1100 series 
computers, is discussed. 


! 


2-1 


2. MAINTENANCE OF PMS 

2.1 Preliminary Activities 

In accordance with the statement of work for this 
contract/ the project team produced monthly PMS reports for 
the first six months of the contract. This activity had the 
following beneficial effects: 

1. New team members gained experience in learning 
and using PMS. 

2. High-quality monthly performance reports were 
prepared and distributed. 

3. It provided a training period for the Bendix 
Corp. personnel who were to take over the operation 

w* 

of PMS. 

4. System instabilities were detected and 
eliminated. 

As a consequence of producing these monthly PMS 
reports, an important and interesting anomaly was noted in 
the behavior of the UNIVAC 1100/82. The CPU percent 
utilization would vary between two levels, 10% and 70%, 

This "bimodal" behavior was interesting in that it obviously 
represented some sort of "thrashing" or "deadly embrace" 
phenomenon, and it was important in that excessively high 
CPU utilization threatens the reliability of the computer 
system. 

Subsequent studies indicated that the problem may 
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have been caused by competition for resources between SIP 
and OSAM. In accordance with this presumption, OSAM use was 
cut back severly, and the PMS reports reflected a reduction 
in the bimodal activity. Still, the University of 
Louisville staff regard the source of the problem to be 
unproved, and we continue to recommend that definitive tests 
be performed. 

2.2 Debugging the PMS System 

PMS is a large and complex software performance 
system. When dealing with programs on this scale, bugs 
in a system are inevitable. PMS was written modularly 
with the application of "top down" design techniques. 

This eased the difficulty in finding errors in the 
system. 

The first major bug that was corrected was found 
when generating the 1983 December report. PMS had 
difficulty in creating files needed to produce the December 
monthly report. Apparently, PMS did not handle new year 
transitions properly. The error was found in Data Reduction 
Module DRMPR4. A logical condition was tested improperly. 
When the first month of the year was calculated, it was 
defined as thirteen. Consequently, all subsequent months 
calculated were offset by one (the second month of the new 
year is calculated as the first month) . The system was 
corrected and tested again, but the monthly report still 
could not be produced. Later, it was discovered that a 
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trend file had a date that was out of sequence. The bad 
datum was corrected and PMS was executed, this time 
producing a correct monthly report. 

Program module ARMEI3 did not close a, file called 
"MISCELLAN" properly, generating an error when other modules 
read the file. MISCELLAN contains five records. After 
ARMEI3 finished writing the fourth record into MICELLAN 
file, the file was closed? thereby, altering the number of 
records in the file from five to four. Any program that 
tried to read a fifth record in the MISCELLAN file would 
generate an error., To correct this error, ARMEI3 was 
changed to write a dummy fifth record in the MISCELLAN file. 

A scheme was prepared for avoiding an annoying 
message. When PMS had difficulty handling a SIP 
cycle, a program module occasionally generated a message 
"***DRMFB1#3 - NONFATAL ERROR IN READING SPHI STORY' 1 to the 
terminal. PMS may even be in an infinite loop when this 
message appears, on the screen. After this message is 
displayed several times on the monitor, the PMS system 
operator wonders if a SIP cycxe cannot be reduced. If the 
SIP cycle cannot be reduced, it should be marked for 
skipping and PMS should be run again. To help the operator 
make this decision, the PMS software was corrected so that 
the error message is written to the monitor once, then it is 
written to a file called "TRACER" along with a counter, so 
that the number of times the error message occurs is readily 
apparent. If the PMS system is in an infinite loop trying 
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to reduce a SIP cycle, the DRMEBl error message can only be 
written into the TRACER file several thousand times. Once 
there is an overflow in the TRACER file, the PMS system will 
crash. The PMS operator will then know that a particular 
SIP cycle cannot be reduced, and will mark this cycle for 
skipping before running the system again. 

Once modifications were made to the PMS system, 
they were documented. Change Request forms were filled out 
to reflect changes made to the system. The program's PDL 
was also changed to show the new logical flow of its 
modified program. Overall, the PMS system did not have 
any major errors. Changes made to PMS were subtle modifi- 
cations, but necessary if PMS was to operate reliably. 

2.3 Enhancing the PMS System 

Previously, PMS was not especially user friendly. 
This made it difficult for beginning PMS operators to run 
the system properly. An indepth knowledge of PMS and 
UNIVAC ECL was required to produce satisfactory PMS reports 
consistently. This is especially apparent when trying to 
run the Report Generation module to produce the tables and 
graphs contained in the reports. 

In order to increase PMS ease of operation, it was 
decided that PMS should be accessed through a menu driven 
program. The menu program executes all pertinent procedures 
of PMS to ensure PMS proper operation. By having a menu 
driven program of the major operations of PMS, the operator 
will be more aware of the types of operations that PMS can 
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perform since these operations are listed in the menu pro- 
gram. An indepth knowledge of how PMS functions operate 
is still required of the PMS operator when problems develop, 
but the menu program makes it easier for the operator to be 
competent in routine operation of PMS. He is more aware of 
the different functions PMS is allowed to perform. 

The menu program is a FORTRAN program (See the 
Program Reference Manual for a complete listing) that is 
automatically executed by the procedure that loads the PMS 
system from magnetic tape to disk files. Through the menu 
program, PMS may be set up for operation and executed. The 
menu program has 15 options. Option A deletes all the files 
needed by MOMPOl. Normally, the files used in the execution 
of MOMPOl are handled properly, but if there is a problem 
when executing MOMPOl, this option is selected. It will 
allow the user to start from scratch and enter a new set of 
parameters in MOMPOl. Option B allows a user to set up the 
PMS system for a monthly performance report run. This 
involves entering the operator name, beginning and ending 
dates of the monthly report, SIP cycles to be used by PMS, 
threshold values for devices configured on NCC's UNIVAC 
1100/82, and modules of PMS selected for execution. Option 
C executes the PMS system. The modules of PMS that will be 
run are determined in module MOMPOl. When changes need to 
be made to any program in PMS, Option D will compile the 
edited program. Once modified programs are compiled. Option 
E may be selected to map (link) the entire PMS system. If 
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it is desired to save PMS on any tape number, especially 
after modifications are made to PMS, Option P may be 
selected. To obtain a complete listing of all programs and 
ECL command files contained in the PMS system, Option G is 
selected. To print the monthly performance report generated 
by PMS, Option II is selected. The monthly performance re- 
port is sent to the UNIVAC's main line printer. Option I 
gives instructions on how to execute the PARQA. PARQA de- 
determines whether a particular SIP cycle may be used by 
PMS. Whenever an operator desires a listing of files 
currently on a magnetic tape, Option J may be used. The 
operator only needs to input the number of the tape he wants 
to look at. As PMS is used, the two work files (PMS and 
UTILITIES) accumulate an excessive number of versions of a 
file element. In order to minimize the disk space useage of 
PMS, Option K is selected to delete all file elements, ex- 
cept the most recent version. Option L concentrates two 
files, 66 columns each, into a file of 132 columns. The 
interlaced files are used as documentation in the PMS 
monthly performance report. Option M performs a catalog* 
that lists disk files created under a user's account number. 
A catalog is performed periodically so that the PMS operator 
can delete unwanted files to conserve disk space. Option N 
lists the current disk file usage of a user while logged on 
a UNIVAC 1100 series computer. This option is helpful to 
the operator in- case PMS does not execute successfully. The 
operator can determine if all files needed by PMS were 
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assigned. Option 0 exits the menu program and returns the 
user to the UNIVAC’s operating system. 

At the NCC, there was a limit for how much disk 
space each user is allocated. Because of the size of the 
PMS system, the disk space allocated for PMS was nearly 
full. PMS was analyzed to determine where in the system 
disk usage could be minimized. Previously, PMS copied 
SYSBAL$LOG$ files from tape to disk even if they are 
designated to be skipped by module MOMP01. A scheme was 
prepared in the ARM units to prevent loading in the SIP 
files to disk that will be unused in a monthly report run. 
This greatly reduced the disk usage of PMS. 

. Originally, the PMS system operated using three 

tapes: two trend tapes (which stored trend files) and a 
system tape (which stored the system files such as PMS and 
UTILITIES) . When the system tape and trend tapes were 
changed periodically to save a new version of PMS files 
and trend files, this created difficulty for the PMS 
operator. It was easy for the operator to specify incor- 
rect tape numbers that were to replace the former ones. 
This arises from the fact that modules which reference the 
system and trend files had the tape numbers hardcoded into 
their modules. If new trend tapes were to be used, the 
operator had to change the tape numbers in the programs. 

A new system tape required changing a tape number in an 
ECL command file that stores the PMS system from disk file 
to magnetic tape. 
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A further problem was that the use of three tapes 
was inconvenient and error-prone. The mounting and dis- 
mounting of three tapes by the UNIVAC operator took a long 
time, and the tape drives used were not always reliable. 
Changes were undertaken so that the files contained on the 
system and trend tapes would be stored on a single tape. 

Changes were also made so that the user is now 
prompted for the system tape number the PMS system is to 
be stored on. Once all modules of PMS are executed, the 
system is saved on the specified tape number. The entire 
system is then deleted. This procedure forces the PMS 
operator to reload the PMS system every time he wants to 
generate a monthly report and reduces the chance tnat files 
needed by the system are rolled out. Once the PMS system is 
loaded from tape to disk the menu program is executed so 
that the the operator can immediately select which functions 
of PMS he wants to perform. 

' The enhancements discussed i«ake ,PMS more reliable 

and faster running. Also, the system is contained on one 
tape (including the trend files) and is more automatic 
since the operator no longer concerns himself with the 
correct trend tape numbers needed by the ARM units. 

2.4 Documentation of PMS 

Once all enhancement developments were performed 
on PMS, three documens were produced: 

PMS Installation, Operation, and Maintenance Manual 


PMS Program Reference Manual 
PMS Pile Reference Manual 
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Copies of these three documents have been provided to NASA 
and Bendix. Other copies are on file at the University of 
Louisville. 

The Installation, Operation, and Maintenance Manual 
describes PMS operator procedures. Guidelines for 
installing, running and maintaining PMS are included. The 
operator is shown how to access SIP cycles on the UNIVAC 
1100/82, then store them to magnetic tape(s). Once the SIP 
tape{s) are created, procedures describe how to determine 
the valid SIP cycles to be used in a PMS monthly per formance 
report run. There is also an error recovery section that 
explains operator recovery options in case difficulty should 
arise while running the PMS system. Next, there is a brief 
description of the internal function of PMS. There is also 
an explanation of the chronological execution of the PMS 
system, while PMS generates a monthly performance report. 

The last section describes maintenance of PMS. Instruc- 
tions are given that show how to compile programs, map 
(link) programs, minimize PMS disk usage, and save the PMS 
system on magnetic tape. 

The Program Reference Manual gives listings of the 
PDL and code for all PMS programs, including supporting 
utility programs. This will serve as the primary reference 
for system modifications and enhancements. 

The File Reference Manual provides descriptions of 


* 




all data files used by PMS. It includes file formats, 
variable names, and sample listings. 
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3. BENCHMARK TESTING WITH SHORT SIP INTERVALS 

Bendix and CSC recognized that PMS reports provide 
performance data in a convenient and readable form, and 
that PMS reports could be produced much faster (one day) 
than other performance reports. They were therefore 
interested in using PMS to aid in analyzing benchmark tests 
and V and V tests on the 1100/82. Both Bendix and CSC 
requested that the University of Louisville personnel 
determine if PMS could be applied to such tasks. 

PMS is configured to process SIP data taken at 
30-minute SIP intervals over a period of several days. 
Benchmark and V and V tests use one-minute SIP intervals 
over a few hours. It was questionable whether PMS could 
easily be adapted to these short SIP intervals. 

A test run of PMS with one-minute intervals was 
attempted. PMS processed the one-minute SIP intervals 
without difficulty. Normal PMS procedures were used to 
produce a PMS monthly report. Only three to four hours of 
data could be processed because the file generated by SIP 
would become too large for PMS to handle. The report 
produced using the one-minute SIP interval cycle contained 
all the tables and graphs normally generated by PMS. The 
trend graphs and Daily Average Report table produced trivial 
results because these graphs and tables are designed to sum- 
marize data for up to one month. Since only three to four 
hours of SIP data were used, the cycle was much too small to 
obtain meaningful results. In the Busiest Day Summary 
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table and other standard report graphs, useable data was 
recorded for memory, CPU, and highest disk utilization. 

Also, the conditional graphs that plot threshold parameters 
vs. time of day were successful. The resolution of the 
graphs was coarse because PMS summed the one-minute SIP 
interval raw performance data into 30-minute time slots. 

It was determined that, with suitable modifications,, 
PMS could be reconfigured to provide useful reports on 
benchmark te3ts. This remains an area of possible future 
research. 
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4. TRAINING OP A PMS OPERATOR 

At the onset of the this year's research, NASA specified 
Bendix as the contractor who would eventually take control of 
the operation of PMS and the distribution of monthly PMS 
reports. In accordance with the contract, University of 
Louisville personnel undertook The training of the Bendix 
operator, E, Z. Block, 

Throughout the first half of 1984, the Bendix operator 
observed and assisted in the generation of monthly PMS reports. 
He became familiar with PMS operation, the gathering of SIP 
data, and the tape handling routines. 

In June of 1984, the operation of PMS was turned over to 
Bendix. In July of 1984, Bendix released its first PMS report, 
the report for the month of June. 

As changes and upgrades to PMS were developed, the new 
releases were issued to Bendix. PMS reports continue to be 
generated by their PMS operator. 
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5. PMS2 i DESIGN OF A GENERAL PMS SYSTEM 

The PMS system described in the previous section was 
designed specifically to analyze data from the operations 
partition of the UNIVAC 1100/82, The contract required that 
PMS be extended so that it would operate on the backup 
partition of the 1100/82 and also on the 110Q/80A, a 
software development machine. 

5.1 Design Criteria 

After extensive interviews with NASA and contractor 
personnel to determine the form and content of the new PMS, 
it was decided that PMS should, as nearly as possible, be 
the same for all three configurations. Differences among 
the three machine configurations would be handled by 
selecting different options and data files, but the PMS 
programs would remain the same for all three. This new PMS 
was dubbed "PMS 2" . 

In order for PMS to run as a general performance 
system that could evaluate the NCC UNIVAC 1100 series 
computers, some of PMS ' s parameter specifications needed to 
be changed to match the environment of all three. All of 
the new parameters needed to be common for all the NCC 
UNIVAC installations. The parameters that were determined 
to be most useful were CPU utilization, memory utilization, 
average disk utilization, TIP throughout, TIP response time, 
demand terminals in use, demand response time, and batch 
jobs open. The PMS report given in Appendix C, however, 
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includes PEP and DTV information since these parameters are 
valuable for the NGC's 1100/82, for which the mentioned 

» 

report was produced. The parameters which are general 
enough to be included in the new PMS tabular output were 
listed earlier and the three new parameters, demand 
terminals in use, demand response time, and batch jobs open, 
can easily overwrite the DTV and PEP data tabulated in the 
Report Generation module of PMS in a step towards the 
universilization of PMS. 

5.2 Implementation 

PMS1, the version of PMS which runs exclusively on 
the UNIVAC 1100/82, was used as the foundation for PMS2 . 

The first task was to redesign the PAR reduction unit, 
DRf4PR4, to acquire the additional parameters required of 
PMS 2. 

Although acquisition of TIP response time and demand 
response time were challenging problems, they were 
eventually acquired and DRMPR4 successfully passed its 
integration test. A listing of DRMPR4 is given in Appendix 
A. 

DRMFRU, the Fortran Reduction Unit, had to be 
completely rewritten for PMS 2. This complex and lengthy 
program creates the SPHISTORY file which is a structured SIP 
Data History. Fields of SPHISTORY represent the different 
parameters collected by PMS. The created SPHISTORY file is 
used by the FORTRAN Data Base Unit (DRMFB1, DRMFB2) , to 
create the Consolidated Data Base files used by the rest of 
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PMS. The program is extensively commented and has detailed 
PDL. The listing of the program is given in Appendix B. 

In order to make the new desired parameters 
available to PMS by the PAR reduction routines, a number of 
files had to be entirely reformatted. These files, namely 
PARAMADEP, PARAFLNMS , and THRESHOLD were each modified to 
include, respectively, a definition of the new parameter 
(needed to identify it from other parameters in PARDATAFL) , 
the name given to the file which will be used to accumulate 
data at various times for the parameter, and a threshold 
setting, which, when exceeded, will trigger the generation 
of a conditional report for the parameter. 

An entirely new file, called SYSC0NF1G, was created. 
This file was developed in an effort to probe some crucial 
characteristics of the system which could then be displayed 
on the cover page of the PMS report. The existence of such 
a file became particularly desirable due to the need to 
identify a system report for the 1100/80A. The four records 
of this file are: 

TOTEM: The main memory size of the system. 

NUMCPU: Number of CPUs configured for a day. 

EXLEVL: Executive level for a day. 

DSKCNT : Number of disks up. 

Upon completion, PMS2 was tested with a subset of 
the data for the month of August, 1984. The resulting PMS 
report is given in Appenix C. 
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The sample report produced by PMS2 proves that it 
can be successfully applied to performance management for 
NCC computers. Consideration should be given to applying 
PMS2 opertionally on all the NCC UNIVAC computers. 

5.3 'Toward a Universal PMS System 

In May of 1984, University of Louisville personnel 
presented the current research at a meeting of the UNIVAC 
users’ group, USE.- 1 - 3 PMS 2 was described, and its 
extension to PMS 3 was also described. PMS3 was to be a 
version of PMS which would be able to run on any UNIVAC 1100 
series computer, not just those at the NCC. 

We received twenty-six requests from systems 
managers of UNIVAC installations to be beta test sites for 
PMS3. It is clear from this that there is great demand for 
a software tool of this kind. 

As the present contract is expiring, we have no 
immediate plans to develop or release PMS 3 , but this remains 
a possible avenue of future research. 
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6. CONCLUSIONS 

PMS has been an operational system since November 
of 1983. Although PMS could produce monthly performance 
reports at that time, a beginning PMS operator without much 
experience using the system would have some difficulty 
generating a PMS report. The enhancements made to PMS 
simplify the user's interface. An operator can now 
generate PMS reports without detailed knowledge of the 
internal operations of PMS. Documentation on PMS is now 
supplied to help the operator in case difficulties arise 
when executing PMS. The operator now has standard pro- 
cedures to follow when installing, maintaining, and 
operating PMS. PMS is a more automatic system because the 
entire system is now contained on a single tape. By having 
the operator prompted for the tape number of the system's 
tape, errors are reduced when running PMS. All, known bugs 
in PMS have been eliminated, thereby significantly 
increasing the reliability of PMS. 

PMS is a viable and valuable tool for performance 
analysis of the UNIVAC 1100/82. It should continue to 
provide PMS monthly reports to NASA and contractor 
management into the foreseeable future. 

PMS 2, the general PMS system, is ready to provide 
, performance analysis for all UNIVAC 1100 series computers 


at the NCC. 
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l f r L " ^ > - CHECK jf FIRST PASS 

hC Ur u:*l CAU a THIS- SECTION COMPUTES THE ACTUAL 

«ClJCL’:=MOf a I.UMJsF OF CAUS AND I0US IN THE 

I Zk l,-i '.CAL-1 5 ST STL!!. 

jr r^'Kjic, 

<-CTCAU:saCTC».U- 1 
El H I 
i HI F C R ' 

F OR 1 , I.JOU-1 

j m'idiK lu^jc jj «*u *.;'?( n mu:o 9 n H; 

i*i:r mi un.ch n 

If J <r «. a. J f THIS UNIT IS INACTIVE 

ACTIOl 1 S = /CTI0U”1 Z EOF TRACT ONE f fi CH THE C.CUI.T 

e ncii 

cucrcc 

f LOCAL, 16 ATE CSC £],JNTVNGUrO, # L* 1 Cl C 3l 5 ' , h£ * KD A T C !f 6 3 , J f.TL EN C! D A 3 , } 
I (TEE t ! 09 3, A CT.CAU [ ! S3 3,ACT1 OUE !C 33,NLC t!tj] ,KCUt ! C 2 3 . j 
NUMTSt ! Ci3 .EXECVERS [ : £ ! ED 
F Lac, : = 1 
c t;C IF 

oi d 

F .OCAL,SOAUt!Ce?,IlTmor!C«3,on£!c!3 f lASTIH[»ei13,CUflUMt!Cl13 
OK-.UUTt 

f LccAL.scATtrict:, i ntvno [»o^t,cidc rcs 2 »voui t!cin,v.cvr!oiu,vDidncn: 
v:e:UC T13,VoeAtJC T1j,VCiE£ 1C 4 13, V05UC ! Cl 1 3 , V<33 U ! C 1 13 , VG32 E ! 01 1 3 
OJD« s CJB-t 1 

F LOCAL, SCATEnri], INUNCUCATrCIDC ! CS3 , VC3! t ! L1 1 3 , VC3-C | D 1 13, ; 

v::5MCT13,VL36C!0l13,v:3?t !01 13, VDAAt 10113 
oid := oj o ■* 1 

P LOC AL,£CATcriOd3, 1 NTTKO C 104 D,O10t 10S3 i VOiEC !l)1 1 3 ,VC39C1C1 13 , J 
vC4"Ufi113,v£<U!D113,Ef‘4ZC!D1l3 

FCR I ,;,NCAU"1 

if p::i<ii;a s skip inactive cal 

Ojt :*3;C3uf 1MJ * UCC3 

P LOCAL, SCaTEC! o C 3 , 1 NT VN Ct ! C 43 ,oHC 1 CE 3 , PC 31 Cl 5 0 1 13 , PtjT 2 E I ! C 1 1 3 , ; 
p J nm C 113 ,FC 1 ? El 10 113 ,pj 1 £C 1 ! Cl 13 I PJ 1 V tl ! 01 13 , PCJoCl 1 C 1 13 
p:c?E 1 U 1 1 3 ,F r £ 2 t I ! Cl 13 

E NL I F 
6 NO FOP 

FCR I , . , N I Oil * 1 # LCCP FOR EACH 1 0 L* 

J :=K3C 1( I IT 1 UCC- f I J tiu ; JF< nnu: F 7fl HIU0L9 U ) •* J 

iu:i 1 1 1 iTiu.nf n tijii'c n 

IF J 5 ’ i SKIP INACTIVE ICL 

o)c:*i;ii;:nci * i ) 

P LOChL iELATEE! C £ 3 , J N T HA' C E i C 43 ,OTDC !Do3,IU' , Lltl iCll3,lllkCtCj J C T 1 J , ; 
Iu:3-CJ!.l13 l :u;.4Cl«C113,Iu;'-;Ci!M13,Iu:v.£Cl!cl13,; 

IL,.'7Cl ! Cl 13 , 1 U - w rr IEC113 ,lu:CvCi!l113 
:u : = ci it 1 

P LC CAL ,£ L * TFl! C'.'.,! F meC K43 ,LICE lSt3 , Ii:lCn !D ,1 3 , 1 U31 It I ! 01 1 3,; 
H’iliri !C* l3,JJCi:t lit 1 13 .iUuUU! til] , JUCISH !C 113,; 

1 u ; U E 1 ! 0 11 3 

EM IF 
E'.D'CA 

F Cn i , . ,NUM TE-' 


E LOOP f OK E AC n DEVICE 


A-ll 


SKinat 

OF pr) »■> f 


pa'oe rsr 

'j \J,?TY 


51- 

EU 

5 f 
51 - 
51 • 
5 1 


5 f» v f \* ft 

. • !. 

c tl'.C TE J 


^ u ft 


niicm,; 


i SET fUhCTJOV SIZE TO ZE'C 


tFn T i ; fl * , £-* « f r 


APPENDIX B 


PROGRAM LISTING 
PMS2*PMS . DRMFRU 


B-l 



f OR T ft AJ, 






!^i 


» *&! 


f.* •?! T! •Cft t f i 'J 


♦ 


vllT ImVwCATIC! 1,4,.:; ts 

I'l F 

ft L‘ <CATA PEUClUf. "OCOLi * f OR 7 ft AJ, 

4 

t 

* 

■ ; t UC T 1 L’., 

I 1) 



A 

h 

* 

FUftftoSt ; Ti, 

CONVERT FAR 

ft E 

DUC EC DATA 7, flwEE uf PERFORMANCE CA7 A 

m 

<* 

>• 

ft 0 P USE GY TK‘. ACMAlNLEft 

Of 

PMS, 

Q 

« ^ 

c 

INVOCATION 

7 1- 0 c : SXCT 

PMS.CRMFRU 

11 

w 

V 

Mle/PtCCRC 

f E F E AErtC tS ! 



i: 

V 

F 1 Lc l.il E 

USE 


C TcMS 

i 3 

c 


C t ft . J 


IFFIMTK'U Of PARAMETERS ANC .DEVICES 

4 » 
• - 

c 




USED 

4 P 

c 

r f- 3* 0 PE n T N f l T • 1 


RMS 0 FERAT CR INPUTS 

^ ft 

r 

w 

F.ISMCC&Nf ILU, I 


I/O C ONF I .U RATIONS 

1? 

c 

PRS* PARC AT AFL. I 


PERFCiRMAN'I DATA REDUCED FT PAR 

1? 

c 

PMS* SPHI STCftY. 0 


PERFORM* Mil l DATA OuTPUT flLE 

It 

c 

PKS* TRACER 

. 0 


PPOGRAM EXECUTION MESSAGES 

21 

12 

c 

F S ■ S > £ C CNF 1G. 0 


■SYSTEM C CN . IGURATJ ON DATA 

c 

w 

1 «.*TE n»‘£ D I ATS 

VARIABLES : 



21 

w 

ha me 

TYPE 


CE SCRIP 7IuN 

* 4 
; m 

c 

CM 

JNT 


ROD COUNTER ft C. ARR-AYS 

iS 

f 

* 

NUNC3E 

INI 


NUFEER OP CDF. 'ILES If. PAAAFLNMS. 

:s 


FEPFUJ 

RE AL / COM M Oli 


f E F MULT I PI. 1 E r FACTOR 

i ** 

h 

F I LC Du 

IN 7 


NUPECR uf CDF »ILES IN PARACADEF. 

- ? 

c 

D E V ft! * J £ 

CHAP 


DEVICE MNEMONIC FROM PARA MACE F > 

ii 

c 

UNIT 

CHAR 


DEVICE UNIT R FROM PAFAMACEf • 

“ 

c 

MODEL 

CHAR 


"OCEL It FROM ' A R A M AC E F • 

ii 

c 

C ATT7P 

CHAP 


DATA TVFC FRC PARAMACEF . 

- 1 

c 

FA PM? 

1NT/ COMMON 


CNF CI W E ffSICf R ARRAY OF IE ELEMENTS 


c 




CONTAINING CCi FILE NU^bE RS FOR PARAMETERS 

j’i 

c 

CEVCEf 

CHAP /COMMON 


T-C DIME KS1 Ohio ARRAY CONTAINING DEVICE 

4 ; 

V 




MNFMCMC , Peril. NO,, UNIT NC. AND DATA TYPE 

^ < 

c 




FOP ALL DEVICES IT. PAHAMA.DEF. 

•7 

c 

DEVDAT 

FEAL /COMMON 


TW C Cl M ENSjON«L DEVICE D A 7 A ARRAY 

_ c 

c 

‘.Ut-CFV 

INTACCMMCN 


NUMbER Of CcV.CeD £ HE C 1 f I E D IN ptRAMADEf. 

3 9 

c 

C A Y C F 'T 

If; 7 


NUPbffi Of CYFLES TO 3E REDUCED IN ONE 

4” 

c 




INVOCATION 01 CAKRPU, RtCCRD S OF MI S C ELL AN . 

<•1 

t 

F £ Ft A 7 

CHAF 


REPORT CATE FrCM CPERINPUT. 

s 2 

c 

ll.t ATI 

FEAt 


DATES FE AD Ift FKON OPERINPL'T. 

i? 

c 

STDATc 

IN T 


START CATt OF REPORT 

-.4 

( 

E3E ATE 

IN T 


CNC CATS OF P. ..PORT 

<■3 

t 

CAYLCF 

IN 7 


MAIN LOOP COUNTtR f OP CAYS Of SIP TO cE 

it 

c 




Pc CUC CD 

• ? 

c 

J OC T If F 

IN T A CC.V CN 


JOCONUGU. RECORD TIPc 

• c 

c 

t A VL A T 

riT/CCf/’Ch 


SAVED CATE 

• c 

t 

f A ft 71 r 

I f. T / C C !• v C M 


'-E(uit TYPE FROM FAnCATAfL. 

_ * 

c 

i util 

,r i/cc.r u f, 


SI f f ATA LLuC c. uATE 

r < 

c 

JMVAL 

INl/CCK* CN 


INTERVAL NUMBER FftCfl PARC/TAFL. 

; i 

c 

cut 7 Y ft 

5, NT/ COMMON 


F £ CGF D SUbTYPt FROM PAROATAftL. 

i * 

c 

UMC1 

CHftP /CO" M C ft 


NEXT DAY FOUND INDICATOR 

: 4 

c 

ELFIJM 

"E AL / Cu t ft Cl. 


ELAPSED TI *’ S FEmO FROM F'AfiCATAFL. 

t c 

v •> 

c 

FRGC Nf. 

INT/CCMH CN 


CN f C I M[ N'S I ON AL ARRAY WITH A ELEMENTS 

« i 
■> i 

c 




SPECIFYING fftCCtSLCfi NUMBER IN USfc 


8-3 






r rr 

c 

lent • 

:i.i/cc>, v u. 

"A ]N PFKCRY S He 

* s 

♦ 

c 

• UP ( 

I M 7 C C ,Y ” C P, 

SuPl-PR Cf CPUS C 0 1, f IGuFEO ft* A DAY 

* 

c 

C a LC Vl 

CpAR/CtM'!' N 

l >1 (U T 1 VE LEVEL FOP A DAY 

t ' 

9 

V 

r pcm 

int/cc.-.vcn 

vu a if l f c je fs ur 

{i 

c 

TP iCI. 

jp, :/coi-,"u 

SI F DATA LLOCF TURA-Ot, 1IFE 


c 

1 J*PI 

;nt/ ccvcf 

SI F CATA cLOC i> 7URN-OF F T J KE 

7 

in 

c 

7 ; rc M 

I* T/t:,: u t.s 

T 1 F TRANSACT! CN COUi.T 

t 4 

c 

S > M C L 

FEAL /CuMCI, 

SI STEh 1 CLE T in 

^ 5 

c 

Ci)K' 

INT/CC.NMU 

RESIDENT EXECUTIVE. MEMORY SIZE 

» t 

c 

e » < > c p 

JN T / CCP. V CS 

EXECUTIVE SEGFENT >*EM OR Y SIZE 

i? 

c 

c cr f.F' 

J*.T/COI."th 

CilFMCP, C ANN M EM OK 7 SIZE 

C ; 

c 

T 1 f P E 1 

INT/COim.N 

TJ F MEMORY SIZE 

r 

* * 

c 

EE LP'EI- 

ir;i/cch v os 

REAL TINE P-EMCRI SIZE 


c 

:e‘>Ei*. 

jp;i /ccn u cn 

EE FANt N CKOFY 51Z t 

p 

p 

% 

: A 1 P E !■ 

IP. T 7 COM* CP. 

CAUh P'S > CRY SUE 

?2 

c 

SvFCNT 

IVT/CCP.VCS 

S » A P CCUNT 

77 

c 

r; F FC 11 

FEAL 7C Cf PCS 

T I f FROORArS JN MEMORY 

U 

c 

S T'PFG 

SEAL 7COMMCI, 

PE AL-T 1P( £ PROCRAP’5 IN P^ENCRY 

75 

t 

tPCPFv 

FEAL /COMMON 

DEFAPD PFOGRAFS IN REHORT 

7 * 

c 

C ATPRO 

REAL /CO M M,ON 

FA TCP PR CGFAM S IN M£f>ORt 

;•» 

c 

fi Lt A TE 

1 N T /COM* C N 

SJF DATA ELOCK DATE 

72 

c 

ICLE 

FEAL7COMMON 

T 0 T A L PR CCESSCR IDLE TINE 

■« 

c 

PR CIO L 

FEAL /COMPOS 

PR CCESSOR IDLE TINE 

. n 

c 

MSTASY 

FEAL / COM MOT, 

ONE DIMENSIONAL ARRAY Of U'E 

.i 

c 



elements holding data fop spiiistort. 

c’ 

c 



Cfi EAT 1 CN 

tl 

c 

El, Of a 

CHAF/COMMCf, 

END Cf PARDATAfL. INDICATOR 

*4 

c 

C Fl'C M 

iN T / COMM OP, 

COUNT Of ACTIVE CPUS 

cf 

c 

C D b F> * A 

INT/CCNMCN 

HI CHEST PARAFADEF > CCD f I LE NO, 

ui 

c 

tf'DRST 

CHAR/COMMON 

tE FANt R ESPON EE TI ME 

£7 

c 




£S 

c 

tE VEL9PFENT 

HI STORY 


£9 

w 

AOtrOR 

REFERENCES CCSCKJPTION 

90 

c 

fi. AHCUR 


INI UAL DRAf T EZ17/E4 

91 

c 




52 

C 7 

c 

c 

c 

up. 1 1 flcl 



94 

»*• PAOC E S$ 

1.*. READ PARAMAtsF FILE A ND S T C R E LATA IN FAR^S UNTIL 

5 3 

l 

EO f It REACHE l 


v •• 
p 

c 

nc SE T RO. COUNTER fCK ARPA7S, CRT, TO ZERO 

4 ? 

c 

RESET CCcNAX jc ZERO 

. 

9? 

c 

1‘UTliL] it 

ALL ELEMENTS CF 

PAFMS ARRAY TO ZEhOS 

1 .' 

c 

i P.1 T1»LI ZE 

ALL E L EMEP* T S CF 

DEVD Ef APR AY TO BLANKS, " " 

1 . 1 

w 

r.i mj it 

ALL ELEMENTS CF 

CiVOAT APS AT TC ZeRCS 

1 .: 


CPs K C A RAPAC C 1 , 


1 ;i 

c 

rE AC T»0 F 1 EL t i OF FIRM Ft 

CORC INTO NUPCDL, ftFfUJ 

1 .4 

* 

( (SOU • ALL CF THE CAT A TY 

PEC EELOW "AY NCT DC USED M ANY 

1 c 

l 

r An’I C Ctof* 

f CL if ILL'S AT Kl. 

Of P ARAI4AC EF . ) ) 

ip- 

{ 

CC L’ .TI L EOF Cf PAR AKA IEF 


1 p 

X. 

M f .w in 

f F :elc S OF FhfS 

ENT RECCFC OF P A RhNAO Ef INTC IILCCD, 

1 ? 

t 

U i V " c , 

UNIT, /.CtiL, CATTYP 

1 .’ 

c 

{ (I.C. 1 

EST C AT A TYFS fCF PARA v cTEA L' J T I, F I cl LN'ii FILE NO.)) 

1 1 r 

V 

n L A I T Y F Ji ”TIF„L'- ((TIP WCRF LC AC., A VC JOES 1 S' MEMORY)] 

111 

l 

T I * Z It f A r 

''St',) = F I L CCA. 


ii- 

c 

EP.C1 F 




r 

<m 

Jr C Am 

? 1 . "(Vt.L •' ( ( 

CE' ANC .CM: LC-AC, AVf, JOOS II. MEMORY) ) 


S'* • 


.ORIGINAL, RACjIS IS B-4 

DE EOOR QUALITY. 


I 

1 

1 

I 

I 

1 


lit C ihF', l-Ar'SC) S IlLUt 

ii : i tucif 

1*,i i If t'-TTlF 1. Hr r T „L *■ K.jYTCh aUf LOU, AvG Ji3i P 

11- c -nf„ CAP' 3( .) * f i L ( C l 

11" C ifM f 

117 t If" t A ! T 1 r i: ''UL.L* ffREAL 1jf£ » OR K L CA D , A VG JCCS J S' A' £ v C, P Y ) ) 

1." C ThC F A a v E ( * ) * F1LCCE 

IP l endif 

i :? c jf :Am r j: " t j r s t * kuf response ti^uu 

1 l- C ThE!. HAF'-S( '.) s FIL CU 

U- C ENDIF 

n: c n lauyp j< "eiidst* (ideiai.c response time)) 

Ki v, THEN )■ Ai> "5 { C ) s FILCCc 

U- t ENDIF 

i: c l If i. 4 TT 1 P J I "CPUuL* ((CFL, UTILIZATION) 3 

1.5 L Th f N r Af, f'S ( 7 ) = FIL C Ck 

1." C ENCir 

1.1 C If t A 7 T Y T Ik ,, ' , EN'uL' KhEf'ORY UTILIZATION)) 

122 C Th r li FAN “5 < 1) = F1LCDL 

i:: ; endif 

1.4 C If i-ATTTP Ik "S'.FKT* ((SWAP RATE)) 

1:5 C Th E h FAR f'S <V) = FlLEDfc 

12c i EN'Cl F 

1:7 C If SATTYP IS "DIOUL* (M/O CHANNEL UTILIZATION)) 

1.0 C THE II PAA M $(*C) - FILCCE 

i:a l endi f 

Is? C ( (CHECK TC SEF If DATA TYPE REP PE SENTE C A DEVICE. If SOt 

lil C Th E A FLACk READ RECORDS INTO THE tEVJ.CE ARRAY 3 ) 

U2 C If C A TTY P LAS EISA LT1LIZATICN, "OSKUL", uR FEP WORN LOAD i 

U:- C "ft PNL" | Cf D T V .ORK LOAD, 'DTVWL", OF OTHER DEVICE *ORK 

1 - A C L n A D S i " 0 E V WL " 

1 A 5 C THEN 

W C INCREMENT CN' T BY Q f, £ 

1A-’ C SET CEVCLf (CNTi ! 1 10 CEVMAE 

UC l SET DEVCff CCNTi 2 I TO POCE L 

145 C SET CCVOEFCChTil ) 70 UNIT 

IE? C SET CEVEEF <CNT,4 3 TO C ATT YP 

1 El C SET D£VtfT<CNT,5 ) TO F1LCC6 

1 52 l ENCIF 

157 t If CCLFlLfc NO. IS CT FAaIF'UM fILE NUMBER THUS FAR 

IjA i. THEN SET CCtFILE NO. AS THE LA s 0 ES T FILE NUFF.ER READ f ROT PAfiAKADEF 

15 5 C END IF 

154 ( CNCCO 

1 57 L SET I.UNSES Cf DEVICES, N L w D E V , TO CN'T 

1 IP L CLOSE F ARAKAOfcf . 

117 C *»»ENC PROCESS W» 

1 e.* L 

I4i C 

1 £.2 C 

1 ti l •*«ri-.rcE:s :a*»* ac*d records cf pis cellar, file 

1:4 i £ rfc "I SC cLL an . 

K r - C (UtCuft 2 uf THIS FILE CONTAINS THE NUF'EtR Of DAYS Of C A T A I ) 

ltd C FE"C RECORD 1 CF ’* 1 EC E * L AN , I NT f DAYCNT 

U’ L CLOSE ill SC c LL A ' . 

UP C IF DAYCNT EC 

UP C THEN 

1 7 - : V M T E TC TEK’INmL "IFFFrU fIM'HED - NO DATA REDUCED THIS LoOP" 


a 

■ 


as 


— B-7 

?o®nac page is 

OF POOP QIFAMTY 


; C c 

:vi 

"r’ 

: m 

i 7° 


2M 

1 .4 
Z . s 

J* 4 

zl? 

2 w '} 

zn 

:i‘ 
Z 1 2 
Z12 

zu 

21 S 
215 
217 
21 ' 
21? 

2 i-Z 

z:i 

2 Z2 
r n 

3Z4 

:.:s 


221 
t ‘ f* 

; i I 

- 7 A 
.. m m 

2.5 

- . L 
T » 7 

2 2 c 
2 <-" 
Z - 1 


> I i/ 11 C C E i F Er f U J 

t ? K a >£.itli£*2 5;J 


s .a; t r,* ,1, 

c - u 

f t M F »l • in i 
If isnm.ti.'Urii'j 
If <C*7T1J .eC.': v C.l') 
II Ttn.tC ,'.-M .l'J 
IF (CATTY F.iC ,‘KSK.L'l 
n (OATTU.cC.'Tl FRT'I 
H tDAMYF.SC.'DVtRTM 
If <CA TTYf ,£C , 'CP ILL') 
II lCA T m,tO ,'flEPU'J 
II t C A m f ,EC t '5WFR 1'} 
If (CATTYF.EC.'CKLL') 


fj Li Ci., lcvmj.e lUf.j ri.7orEL i e <ttyp 


PAR *5(1) 
PAR »S C) 

par >s c » 
par n u j 
PAR f$ (J ) 
par rs u j 

r tn »b f 7 ) 
PAR FS ( c ) 

par rs (?) 

PAR *5(1" 


1 = 


ML Uw 
f H CCc 
f I L (Ob 
MlCCt 
f ILCDo 
ML COL 
MLCCj 
MLCDl 
f IL COL 
I I LUS 


.(CATiYP^tO ,'FERVL' ) ,$p ,< 
** A I7i .£1;. dV.L'J.OR. (CAnyp.sC.'tEU'LM) THE,. 

<• M 5 l r i T i J 

s cevpne 

= POOEL 
* IN IT 
1 CATTtP 

s fitcce 


LEV OE F (CNT, 1 ) 
LLV.DE f < CN T * l) 
LEVOE f ( CNT i 25 
CEVPSf CCWT,4) 
CEVCAKCM, 5) 
END ] f 

If (fl LCtL.EC . 5 y ) 


THEN 


f. 


i 25 


4 : 


-R5 TE l *2, * 5 'PD F t H*S SPECIFICATION.;' 

‘’Sfe VOA ?fcMT?4J f1 , » CtWft * TICMT * a > 'OfcVCA T i NT, 

« NO 5 F 

If (FI LCCL,GT.CD2KA>) C D Ef H A X = FILCLS 
If t Tfe f'P i i.E , HUM CO E ) C-w TO 2C 
NL'.rCEV = CNT 

flosTn^ijE^SISsj 1 ' ,Mm£V '' c£VKts fctc> PARAPADrEF.' 

"•END PROCESS 1*** 


C »»»PFwCESS -A.** REAL RECORCS Of **1 SC E LL AN. 
OrEN MM ,ERRs 92 2, MLe *'N1 SC EL LAN. M 

2 . J f i i i, 4 r ■ v i. , ^ . . . 


fUE 


StAL l I M , EZ I CAT CM 
CLOSE U I, 1, £R fi=93 ‘ ] 

L'n 1 TEC 1 L i * ) 'N LM OE R CF CYCLES 
If <DA UN 1 • E 0 . C I CC TO tEb 

•**lNe fscceei z.« »»* 


** 'PROCESS :f*». REA t L AT PS 


TO CE KECUCEC THIS LOOP; ' , CAYCN T 


-r;: t " c : t f bo^ operinplt. file 
Ci-.N (IN1,EnP s ?s, iFJLc = OPEKINPUTi ' ) 

SEAL ( I M , ' . ) f£D[f] 

FA AD MM ,7w) INC AU 

IIS"TE * I FI X l INC /TE'K'Z ^ ;,£) 

? MC UM,7.| I c A T L 


. .DATE 

rastTe = :n x met.: a d 

CLOSE ( I N : , t R A=54 ' I 

»RITE( O'UFCAHj - , ft EP r AT , 

^ J Jf | * . 1 J r i. p !»>▼*. * ^ 


*i 


AStCESi . 


INC CATE: 

* * * 


EC CAT£ 


STAR T i,ATF : ' i S T U A TE 


r 
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T . 1 
U" 
1 I ' 

* 1 L 
? tr 
j « /. 

t r jj 

* » ¥ 

1:9 
3t7 
34 1 
Z 42 
lil 

1 14 
2d 
ltd 
36? 
It’ 
2*9 
17’ 

2 71 
272 
277 

274 

275 
2 7£ 
27’ 
2 7' 
279 
3cl 
Id 

2c 2 


2c£ 

2 : ’ 
t . a 
^ • 


2 ? 1 
2 92 
It’ 
•74 
29 5 
2 v i 
2 - 7 
2 i » 


C 

t ***r f cCi.SS i*>* FEtL'CE fn T A f *C* UCCMIU'. ANi FA Rf *T AFL » 

SrEN ( ) !, 1 , E r.R =1:7 if JLt *'FA SC * T Af L « ' ) 

:AEi. < IU,EfiP» r ;r , f 1LE**J0C&VF JCL, ') 

‘’J El, ( Is:,Ei,s*'»t* if lit* 'CPU STORY. 'J 

*n J Te ( 1 . * O 'f hf f * t : PFEs'C FILEC, e E A t. Y K RE y L'C E ' , C A Y C » T 

vr) te ( < . , 'J'ncij : tf ;«ta 

92 Ft -t (liiii'c, £RR«5£i ,thC*9<75 loCTYF 

:f (i( cm.f»r . i : j cc tc k 

C, 14', CA1L0P*1,C A HU 
1c' (ALL HUM 

Y Ri TE ( 7| * ) ' J 0 ( C|. f 1 GL • FILE rsOCESSEt S L’CC t SSf LLLY IN CPURH 
nRJ T6( O'FOA IU(n ',CA1L0F,'.' 

SAVCAI s ’ 

If (CiYLOr.EO. 1) TnCN 

*K C E A t < I h 7 , 1 Z' , ,CR' i *57t,£NC*97?) ELsDA T , J J, T VA u , F AR TY F , SUE TIP 

If (PART1P.NE.fM) GO TO IK 
E ND I F 

5AVCAT « ELKCAT 
I.EXTH = 'ff' 

END TIL s'N" 

M: C4LL CFMFF2 

H (< ELPTJP..EO .O.OF, (DIKTAT, LT.STtATEJ.OR. (EL NCAT.GT, EC CATE) 
l .01 . ( ClKCAT.GT . (SAVE AT H ) J ) THEN 

WRITE (c.») ‘S P M f B Lf - PAR FILE NOT IN' PROPER SEGUENCE OR 
l ELAPSED Tiff CUT Of SOUNDS' 

GO TO °9999 
'ELSE 

CALL CF.KffiJ 
CALL ti F K F ft 4 
E NC I f 

If ((NEXTM.EO .'N') .AND .(EffDF IL.EC.'h')) GO TO IIP 
IF ((Ef.DFlL.eQ ,'Y') .AND .(CATLOP.NE .DAYCN'T)) GO TC 5 9 2 
1-C CONTINUE 

CP El, (U f tKRs?55, f ILE= 'S YS CON* IG , ') 

Uhl TEC 14, 125 ) TOTHEN 
LRJ TEl ’4, 126) MW CPU 
WRITECU, 127) EaLEVL 
WRI TE< 14, 12E) C SK CNT 

VfRI TE ( K, »)'0fi. M FR L .FITE TC EYSCONFJC:' 

WhI TE< "c, O'TOTMEN : ' , TOTM E" , ' , NU"CPL: ',NUrCPU 
WRITE( JU, O'f XLEVELs ',E>L£VL,', 0 5 A C NT : ' , CS K C NT , ' , ' 
close ( 14 ,err=597 ) 

CLOSE UM t £Rfe92.J 
CuCSE CIM, E®fc«7T 5 J 
Cdit (If, :,l?R- 55 v J 

*n 1 TE ( 1 i , <)'oRNfR It CLOSED CLC FILES' 

C * * * c '’I dCC'tSC i* * * 

c 

fc TO 5.5 

9.; f C : * A T <'.»*rR w fPL i'RCR A', At) 

1 5 v: •* n J TE ( £,5K) '555' 

WhJ TE < £ , •j'C.iXPS CTEC 
Cc TO '599 79 

9). WRITE ( w 1 4 1 c ) '51.' 
fc TO 95575 


TE'KII.ATICN Of FAnAPACEf 


° ,a ^Zs 



••15 

A ft I IE 

<ti« *J 'VI 



*•» 10 

'"9 / > 9 

' . 1 

“ I. 

"KITE 

< 

4.2 


• nJTC 

(i*>) "FAIL 0 fi t TC FE n FAhAMfCEf, TJLE' 

A . 7 


5 v 10 

4 / '• 1 9 

4.4 

• * r 

*M TE 

' /2 1 ' 

i .2 


iw t: 

“V599 

A. i 

% . 

• hi I£ 

< 1 1 9 1 . 3 '72.' 

A. * 


0a 10 

®9 . 2? 

A . * 

7.5 

WRITE 

U, »..) '»? S' 

4.9 


Sa 10 

^ 9 9 V ? 

A1 * 

• *• * 

4hi IE 

f t , V * L ) ' 1 4 . ' 

A ! • 


Oa to 

979 97 

412 

?;i 

a K 1 T E 

U, 9'. J '94 i' 

A 1 * 


Oa TO 

?9 9 9 9 

411 

7 2 . 

WnJTE 

( 0 , > 2 L J '95 

41F 


0 0 TO 

999 49 

41* 

?55 

WR 1 TE 

( 6, 420) '9* i' 

417 


GO TO 

9 5 4 99 

<1 c 

<?i ; 

WRITE 

< 0 , 9 *2C J '92 C* 

41? 


Ga to 

°9999 

4 el 

90S 

UR I TE 

< t, 4 20) '92 2' 

4‘1 


UR HE 

(il *) 'FAILIRi TO PEXC 10CCNF1GI. HUE' 

4 22 


GO 10 

99449 

4 2? 

" t 7 

WRITE 

(*,4*0 '927' 

424 
4 22 


Vh I TE 

(6.0 'UNEXPECTED TERMINATION Of JOCONFJGU, flLE 


GO TO 

7994? 

«2i 

*77 

Wh 1 TE 

< c, 4CC) '97 C' 

4 2 7 


W R I T E 

(i,’T 'FAILURE TO READ PAR t A TAF L. MU' 

4-5 


GO 10 

99999 

42» 

972 

WRI TE 

U, 9C:i '972' 

42-’ 


WRITE 

(Cr<) 'PARDATfFL. COES NOT EXIST.' 

4’1 


GO TO 

99949 

422 

975 

UR I T£ 

(6,42:) '972' 

ill 


90 TO 

099 49 

4i4 

92 : 

WRJ TE 

< £ , G 2 V.3 '520' 

4. *5 


GO TO 

79999 

4 2* 

7t5 

WRITE 

U,4.:c) ' v2 2' 

4.7 


Ow TO 

«59?9 

42 • 

99 ; 

WRI T E 

< 4 , 4 ::) '7?a' 

4 j? 


Cl TO 

99999 

44' 

97! 

WnITE(i ( ?C2) *952* 

4 1.1 


VF I TE ( 

2,<)'CPMFS2: lNE XP EC TEC TERMINATION CF PARCATAFL 

4 42 


00 TO 

7 V 9 4 9 

4 a’ 

995 

WRI TE 

<6, 4'C J ' 99 5 ' 

4 A 4 


Ga TO 

7994 5 

441 

9 r 7 

VR1 TE 

( . t 5:i) '597' 

44* 


9a TO 

459 V9 

4 a' 

5.7 

r f J N T 

*1 ' LK'-’F MJ FIMEhU - NO DATA RECUCEC THIS LCOF' 

A ^ * 

"49 

Mf,T 

'1 ' * •* “CUCCeSS FUL EXECUTION Of t P M F R l 1 * • * * * ' 

4 4“^ 


nn 1 TE ( 

‘ .1 ») 'Sec;: isfUL execution of cfhfri' 

A £' 


C.C1E 

1 IN | E K e * 9 7 2 ) 

421 


Oa TC 

77C 4 

42? 

» ?>09 

CALL f 

9c T C (4»,i) 

422 


•cl TE( 

‘.1 O'CFNfn tXfcCUTlCN HALTED' 

4 21 
4 2 : 

??97 

STCF 

E*.C 



r 


B- 10 

ORIGINAL PAGE IS 
OF POOR QUALITY 


4 i’ 


>i * 

it 


SUi»*uUl J..E (DA (A PstuCT icr. HOtULE - f C R T RA N REDUCTION 1) 


ill 

i 

PLRrCSt } T C TRuCt 

SS KCC..F1CU, 

it ’• 

C 

TH) s I'.ODUlE Rt»OS 

IOCCNFIGU. fOR wNfc DAT TO BUILD PART 

4lJ 

L ► * 

k 

THE DEVC 

IT ARRA1, 


t;' 

i * * 

w 

c 

c 

I *•’ V a* C A TJ uN “lTIOI: 

CALL PNS. 

DR F f c 1 

4 1 i 

fJLE/'cCOPC REFERENCES j 


4 V 

c 

FILE >, A^E 

USE 

CES CKIPT ION 

471 

c 

PUS* J w C CNF JGL . 

1 

1 / 0 C ON F IGUfiAT 101. F I l£ 

472 

c 




472 

c 

LOCAL tAFIAFLES: 



474 

c 

NAME 

TY f- E 

DESCRIPTION 

4*5 

c 

JClf 

m 

UNIT N’UF’fcEh Of IGCONUGU. 

474 

c 

1 Ch‘.E M 

CHAR 

DEVICE HNEHOMC f ROH. 1CC0NF5GU, 

477 

c 

1 0UN1 T 

CHAR 

1 70 UNIT NUHBEh 

475 

c 

IC.VCDL 

CHAR 

PODI: L CODE FOR THE DEVICE 

4 77 

te 

1C51AT 

IN T 

UF OR DOWN STATUS CF THE DEVICE 

4t? 

c 

DEVFND 

CHAR 

DEV ICE F CUNO INDICATOR FLAG 

4 S 1 

c 




427 

c 

V'll FLOW 



L . ■» 





4E4 

c 




4tS 

c 

initialize IOC IV * io : 


4S4 

c 

( ( F J nc NEXT header 

RECCED OF 

JCCCNFICU., HAVING )OCTTF CF 1C)> 


it 7 
if? 
4i? 
4 i 0 

4?1 

492 

491 

441 

445 

444 

497 

49' 

4 4<? 

5 _ 1 

il 1 


5^4 
r e 


si: 

5 *.i 
5 1 7 


INTO ICICi 

1 2 1 19 x, a: 


ICR'.NEH, 
i 2*i Alt 


OR ((.MIL DEVFND =" Y" J 


CC UNTIL I G.C T 1 F = < C OR EOT ( (NOR PAL EXITS)), OR ERROR CNDIT1CN 
RfcH IOC T 1 P fRrs 10 CONTI GU • ( ( f GRM AT (12)1,12) )) 

If 10CT1P = CS 

THE'* • 

(IRE-REAC RECORC FRGP BUTTER. THIS CAN CE 0 ONE B1 READING FROM 
UN) T NtHBEfi ZERO ) 

r£ao field: OF CLFRENT RECORD OF IOCCNFIGU. 

I CUM T , I 0“ 0 Du , AI.C ICSTAT ( ( FORMAT < 1 ? X , 

A4, S>, )1) )) 

SET DEVICE FOUND INDICATOR, DEVFND, 10 " N *' 

DO (FOR C’.T = 1 TO NU'JER OF DEVICES, NUKCEV) 

( < H A 1 C h THE DEVICE IN 1CC0NFIGU. WITH 1H C DEVICE IN THE 
CtVCEf Afi R 4 1 . wHEN A HATCH IS FOUND, SAVE 1HE UP/DOWN STATUS 
AND SET THE NtXl UN'USEC CEVCAT ELtFENT TO THE UNIT NUhFER 
READ f RG“ 1 CCCM IGU. 1) 

If ( CCVCE f (CN T,T I = 10RNEM AND ( DE VO E f <C h 1 , 2 ) *10KCCL) 

A‘t (DEVDEf ( CM , 4 ) = lOl'NITl 

TH E '. 

I ir/DuVN COVE IN C E V OA T ( C N T , ‘ ) 1C I0STA1 
1 tEVft.D K "I" 

((SET Th! C-Vk* ALTERNATIVE DEVICE NUN, PEPS CF CEVCAT)) 

If DEVICE ii IN PE F IN C f V DA T ( C NT , 1 I HAS NOT IE T SEEN SET, 

EIIlL ■*, 

T h i N SET ! 

ELCE 

If tEvC AT (CNT ,7) = E 


EVDAT (CRT ,1 5 TO 10JC 


r 


171 m lii 1,1 »n in in ii\ou>uum/) in \n u in %n in in v* in 


S»iS! 


1 T 

u 

* r 

t • 

is 

r 

» * 


» 

.< 


- t i 

5.7 

e • » 

- . 

511 
e >2 
r *1 

5-4 
5 2 5 
5 14 

in 

I i 5 
£?’ 
543 
541 
54J 
54' 
5*6 
545 
45 


4! 

47 

53 

51 

52 
5 - 

54 

55 
5 if 
c-t 

5? 
3 <7 
5" 
cl 
c2 
cl 
-4 
c 5 
ci 
C 7 
5c : 
St”! 


i Th F*> SET tf V C AT < (M,:J TC JCK 

: ttr t 

: J f t ( V C AT KKT ,*) * 

: iH t r Sit :ev: /r tc> ; tc icic 

c (155 

C I I (C« CAMCf*’ , 4) * . 

C r*-£( w£I e tV t AT I CM, 4 J 1 0 JulD 

( Et.Sc 

I Jf DcVCi AT tCNT ,121 » . 

C T H fc f. SET rEVCRKCKJtt!) TO )OH 

C ELS l 

C I) C (vr AT< CliTtl -) * : 

C T H Ci* SET t SVCAT ICl.T |U> TO 1CJ0 

: ELSE 

: 1 f fEVc AT CCN 1 1 15 ) * V 

C T ► E I- SE 1 C £ V CA T < C N T 1 1 5 ) 1C JOH 

C ELSE SET 5m*T(CNT»16) TC 10U 

C EHIf ( (FOR ALTE RNATt 46)) 

l thtl f ({FOR ALT ERliA TE » 5)) 

C CNC1F < tf OR ALTERNATE A4)J 

C ENDlf (IFOR ALTERNATE It'S ) ) 

C ENCI f >Uf OR ALTERNATE #2 J) 

C ENCJF it fCR ALTERNATE F1)5 

£ ENC1F ((FOR CEVltE NUMBER)) 

C ENSIf 

C ENCOO 

C ENCJF 
C END SO 
£ RETURN 


t CODE 

C 

SUBROUTINE CRMTR1 
C 

£ ** Lc< AL fs CLARA T1QN $ < * 

INTEGER 101 D, 10 $TAT,CNT, IOC T TP 
CH ARAL TER I CMf.EM, - : , JOUM T • 1 , 1 CMC CL*6 , CSVf N5 *1 
C ••GuOE-AL DECLARATIONS-* 

INTsGE B SAVtAT|f*ARTTP,ELKCAT ,) NT V AL t CPUC NT , P POC KM 1 4 J ,TCTM,EP 
1NTEGE 0 Tl^EON, T If EO F , T1 Ft NT , R !X MEM ( E AC ME M, C 0 «r l ft , TJ PM EM , R ELF 1 EM 

J..TEGE F NU H LEV, t ERMtK ,PATKEM,S VPCNT .BlCATEiPARM St I'J , CCcMAX 

I '.TEGE R NL’ V CP J, CSKCNT , IN ,1 N T ,1 N; , 1 N I 
RcAl f £ 0 f UJ |ELPT|VtSISJCLiTIP p RC l 0 e Vt A T l V 9 , 1 e) 

Rc AL RT u PRGi C.VCPRC tCATFRC iPROKLiH STAR Y< 102) 

Ch ARAC TC R OEVCif f 55 ,4) -s ,N FXTCV- 1 , £XLEVL*12 ,£ NOFJ L» 1 
C-M'-CN Ft* FUJ , f ARMS ,BEV IE r i CE VD AT, NUMCEV ,SA VC A 7, CPU C NT, EN C F IL 

Ccl'MON FrfR TTP, EL* CAT , JNTVAL f N EA TCT , E l. » T I Hi PROC NM, TO THEM, DSN CNT 

CL*’ A. ON Nc-’CPb, c)L£VL,Tl AECN,1 I* EOF ,TI PC N T , S YS I* L , RE XM- EH , £ X CM EV 

C w '< V 0N COMW.EFJ, HF v£M,SE LMEM,C EM-E" ,B A TN E M , S WPC NT , T1 FP R<i , RTMFRG 

C v"vOf f'DF Rt,G>TrSL ,bLD ATf ,PR CI tL ,k£TART ,JI. ,If; 1,)N2, INZ, CC5PAX 
C L Pl'CN CM £R J T 

'-i; fc--'4tm 4 >,id 

11’ f vAf AT<17),i: , 17X , a:, 2> , A1 ,Ai , 5x ,11 ) 


icc t ip = ; 

Cb 'll. CNUlii.UKCEV 


original pasb 18 

OR POOR QUALITY 


l 7i 

m 

• 

; ■>■> 
*?. 
:r , » 

c * 
« * 

5.1 
5.’ 

r * 
• * 

5.4 

5.5 

5.6 

t ■» 
# *» 

5.5 

5 19 

55* 

551 

552 
55? 
554 
55' 
554 
55’ 
55? 

559 

6 

4.1 
6E2 
f.Z 

6.4 

6.5 

6.6 
k ? 

» w 

£.r 

6 '.9 
el" 
6H 
1 1 1 
n r 

614 
ill 
616 
61’ 
6 1 7 
6 1 *• 
t , • 

i:i 

6C? 
6i’ 
664 
c 45 


i:\i4i ( ft T , i j » , » 

55VC4TIC NT, 

C?V' , MICKT| , }»..C 
CEVC«T(CNT,t)*,.L 

cevcht tc;, T , i ’} « 1 

wE5?AT<C*,’i is) 

*.ev: atunt, u) 

;*\cAitChT, uj 

:i' C.STINVE 

i.‘ S.4. ( II.: li'i' |EI»9 «6t4 tiNp* <**) 1CCTTP 

If EICCT1r.feC.JS) T f Et< 

<•£6 5 1.1.2',) 1 C 1 1 • 1 OKI E I* * I C U*. J T » I C l*OlL i J CS T* T 
tevrut « 'in 
b 3 CNT«1,N IFCEv 

If UtjLCef I CNT, 1 )*££.. JC*f, E*) .6 hB , { t f VC i f <C r.T , 2) , E C . 
4 1 CHOSLJ » AN l . ICEVCEF «NT,i )• £L. lOuNJT 31 THEN 

CEVCATCCM |6 1 * 10STAT 
t £ V F .N C « * 

IF (,5£ »D 61 ((NT 1 1 ) »£ C, C« (') T H t N 
CEVC4T (CNT 1 1 3 « JGJC 
ELSE 

Jf (OEWATtCNT ,£),££.. 0. CJ THEN 
OE V C AT (CNT, l) * 1 OH 
ELSE 

"“if UEV0AT<CNT,»).CO,C.C) THEN 
tEVCAT (£ FT ,2) e I 02 C 
EL £ E 

If ( CEVC <T ( CNT i 4 3 . E C «L . L ) THEN 
CEVCATUNT, 4) * 2010 
ELSE 

3 f <DEVCAT<CNT,1I).E0.„,b) THEN 
CEVC AT (C NT * 13 ) * 1 C ID 
ELSE 

if <PEV0AT<trnii4),eo.c.C) then 
CEVOAT lCNT ,H) = 1 0 I c 
ELSE 

If (D EVCAT 1C NT • 1 5 ) < E Q • , ■ E) THEN 
DE VD A T f CNT ,15) => 1 0 1 C 
ELSE 

DE VC A T ( CNT, 16 ) =■ J C I C 
EN6 ir 
ENCIf 
END Jf 
EkCl f 
£N C I f 
ENCIf 
LNCI f 
E N L J F 

If ( C l V f M . £0 . "V r ) GC TO 2:5 
1,‘ CCNTJME 

-.5 F N E 3 f 

if uccth.ne .*.) ct tc ::c 

?4 ; e £ TliFI. 

6'i Cn Ll f SE T C «4 sC) 

STOP 
EJ.C 


C 




B- 13 


ORTGnVAL* PAGP ra 

0F P0 °« QVAUTY 


>, „ 


l* 1 
t <■: 


:U 
(f * 5 
d Ad 
dA 1 

e; e 
cM 
di: 
t .i 
d £1 
ds: 
d£4 
d £ £ 
d'd 
dE’ 

it® 

d£T 
dt r 
dll 
ddr 
ddl 
C d 4 
d i 5 
did 
dC? 
dt: 
ce ■> 
d?" 
471 
d ;? 
dr T 
ill 
i 7' 
d?d 
d? 1 
d ?• 
d7 = 

d i * 

del 

d.: 

i . - 


< 


L ' 

to 

P 

ll'e » wi'T 1 * 5 

3 h ? T e * (CniTA r 

E0UCT1 CN 

MODULE - FoK T c AN FfcCLCUON 

5) 

k 

c 

ALSFCr. i 

TC PROCESS F AFfc AT if l. 

THIS I'OCUuE F sA L S ALL THE 

INFORMATION 

w 


f t f uN i. uL C Ch 

OF DATA 

<!., MINUTE P E e IOC I INK THE 

LEVCAT 

p 

\ 


A * f> £ t AN C £ t T 

S CT HE F 

VA»JAELiS IN FF EP A Fn t I CN FOR 

THE 

t 


C Cf'FLTATIO NS 

WHICH WILL F CLLCW , 


k 

c 

c 

p 

*. 

JNVCC ATI LN 

“ETFCC: CALL 

Fr.S. DR MF 

r i 


FLC/fiECCFC 

c l f iRLNCf S: 




p 

k 

FILE 1. Ai e 

LS l 


f E S C R J F T I IN’ 


V 

FN$*PARCATAfL, I 


CATA F EC LC EC FROM PAR 


L 

LRCAL V A hi AEL c i J 




c 

NA * C 

TT F E 


DESCRIPTION 


c 

C LC J F. T 

JNT 


OLD INTERVAL NUMBER FROM PARCATAFL. 

<! 

S C E V UN 

I h T 


CEV ICE UNIT NUMBER 


c 

SINREl 

INT 


INPUT REQUESTS 


c 

SOTRE u 

lit T 


OUTPUT RCOUESTS 


c 

SCAT Ti-i 

i SAL 


DATA TRANSFER. TIME 


c 

SEMIN 

REAL 


t X I STENC t TIME 


c 

SfiEuUC 

JNT 


NUMBEP OF REQUESTS QUEUED 


c 

SC LNSi 

INT ' 


CUMULATIVE QUEUE SIZE. 



c 

C UM 1 FlCW 

C - -r 

c 

C INITIALIZE PRC 3 DL TO C. 

C JET 0 LC 1 ST * 1 NTVAL 

C < t C LEAP OUT D LVCA T Afi FA T COLUMNS t Ofi RE S f >0 ND INC TO TOTAL REQUESTS IN, 
l TCTAl (.E QUESTS CUTt LXTETENCE TlrE, AND CATA TRANSFEF TIME: COLUMN'S 
C 7 -liJ) 

C CC f OF. C NT= 4 T < NUMBER CF DEVICES, NU^CEV 
C CO FOh COL =7 TC U 
C IM}T 1 «L 1 IE OEVCAT (CNT ,CCL J TC 0 

C ENCCO 

C E N t C C 

C CLEAR ALL ECU* ELEMENTS CF PRCCNM A HR AT 
C IUTJAI.I 2 E CPUCNT, CLSIENT COUNTER OF PROCNH, TO '■ 

C (IVhEN 1 NTVAL EXCEEDS CLCINT, I CLOC X HAS EEEN COMPLETED)! 

C CC IHJlE JNTVAL IS FQ TC C L C I N'T 

C (CCHEU TC SEE IF FARCATAFL, HEADER IS BEJI.C- LOCKEt AT)) 

C IF RECORD T TPt , FAR TTF , EO 0 1 

C lUe-A.EAl ( FO v SUFFER PARAMETERS f R OF FARCATAFl. HEADER)) 

C ThSN READ FARCATAFL. ACnlN, INTO: TGTMEM, KO"CPU, EXLEVL 

c < <f r A-A 7 i : ,, i; , yi , * 7 > , aid j j 

c e i. r ; f 

C IF (FAF 7 TF = :J AhC Cl'iTTP = ‘I 

C CUE-RE AC F p c. v L'UFFEF , 1 TH AN APPROPRIATE FORMAT k H I C h TAMES - S TO 

c TR.E C E S I ? t C R A c A" E T E" OF RECORD, THE FlLLC.IhC- F J.VE IF STATEMENTS 

C A„S ALEC iTAUCTJR EC L'rCN TRIE BASIS)) 

C THEN READ FAFJAT/fL. ACMN, JN T 0 : TH'ECN, TI”EOF MFCPMAT < 1 iX, 111 , 

C IF, 111 ) ) I 




4.4 


t. r 
<• . 
tv* 

1.1 
dll 
» r * 

fU 
d 7 F 

MO 

? - 

7 ;i 
7v.2 
7£2 
7v4 
715 
7L£ 
7: 7 

7.2 
7.0 
7' * 
711 
’ll 
71 T 

714 

715 
715 
717 
7 1 £ 
7 1 7 
72" 
7 il 
7 4 2 
725 
7 24 
7 2 5 
?:i 
71” 
7 IF 
”15 
71” 
711 
7^2 
71 : 
734 

7.3 
7 2r, 
72’ 

•> \ t 

7.5 


C £ f. C I f 

c n i?;rtyp » i) 7NC (iifTiF * :i 

£ 1n£f, ,-54: P/PSAT/fl. AGAIN, ISH : ELHJF, TIFCNT, SYS1CL, s £ x l-‘ E »•» * 

£ tVC‘V UlCf'V < - * i t F11.4, 1 >, J*1, lx, Ml, 4, A?x f 11% 

c 1 *, n 1 ) n 

t £ I, f 1 r 

t If l r A ? T V P s .) A„C (SUsTir » *) 

C Tnf h REAC PAREATAfL < AGAIN, 1N T 0: CGVf.EF, T I P ME M , PEU'EM, 6£MN£f% 

£ lMMS E k f C t, T ( ( f CP v A T (21k, 111, IX, 111, IX, 111, IX, Jill )) 

C END. F 

C If t P T YP * 25 At, C (SUaTYF ‘ 4) 

£ TnFI. PE A C F A S D A TAfL • /GAIN, INTO: TIPFRC, RTPp.G, DRCFPG, EATPRG, 

C » A C A S T 

£ ( (f CRYAT< : IX, Ml.«, Ik, Ml.:, IX, Ml.:, IX, Ml, 2, 1X, F 1 1 • 2 ) I ) 

£ FN5JF 

£ If PARTY F = 1 
C TH3N 

£ 1 NC RE V EN T CPUCNT EY 1 

£ ((FOLLOWING READ DON E WITH F OR MAT (Id, 11 a, 13, E5X, F 1 1 . n ) )) 

£ A £ AC PAFCATAfL. AGAIN , INTO: GLCATE, PkOC f.'M £ PLC AT ) , IDLE 

£ ( t UF DATE PROCESSOR i CLE TIME)! 

£ PRCICL = PRO I CL IDLE 

C ENPiF 

£ If PARTI P = £ ( (A DEUCE) } 

C THFN 

C < (FOLLOWING READ CONE WITH FORMAT < 1 7X , J 3 1 IX, 111, IX, 111, 

£ 25X 1 HI. 4, IX, m,;, IX, 111, IX, 111) n 

£ READ PARtATAfL. A C A I N , INTO: SCVEUN, SlNfiLj, SOT HE u , SCATTN, 

C SEXTlM, SREOUC, S CUMS E 

£ ((CHECK TO MNC .CCV1CE UMT NUMBER, SCVEUN IN OEVDAT t'VKt 

£ NUKEER Of THE 7 ALTERNATIVE OEVJEE NOME £ RSI) 

£ CC FCR CNT= 1 TO NU-feER Of C£VJ£ES, NUMCEV 

£ J F ( CEVCATECM, U = S CEVUN) 


c 

CR 

(CEVCA X * 3 NT 1 

i) ' SDEVUN ) 

c 

Cfi 

1 C £ V C A t ( C NT , 

, i ) = SDEVUN ) 

c 

CR 

CEEV.CATC CM, 

,4) r SDEVUN) 

c 

OR 

COEVt AT ( £NT , 

1 1 1 ) = S C £ VU N ) 

c 

OR 

CCEVtATC CAT , 

1 1 4 1 = SEEVU M 

c 

OR 

(CEVCATC £ N T , 

,15) = SCEVUN) 

w 

OR 

<CEVCAT( CNT, 

, 1 i ) = S C E VU N ) 


THEN 




£ UfCATE TOTAL REQUESTS IN, D E V CA T < C N T , 7 I El ADC 1 NG 

£ Cl NS cQ TC IT 

£ UFCATE TOTAL nEOUESTS OUT, 0 E V DA T ( C NT , E ) EM AC C 1 NG 

v SOT Ret! TC JT 

£ UFCATE CUMILATIVE CUEUE S 1 7 L , C t V C A T < C NT , 5 ) , £ T AC Cl NG 

£ E Curs 2 TO IT 

£ UFCATE NO. CF REQUESTS QUEUED, t E V C AT < C NT , 1 0 , BY ADDING 

. SSePUD TC IT 

£ LFCATE EXISTENCE TIM, C E V C A T (C N T , 11 1 , t Y ACC I MO 

. E E X T 4 1' TC IT 

UPDATE caTA TF.A..SFEA TINE, D E VGA T (C NT , ID I* Y ADDING 
. CC AT TA* U IT 

•; sue it 

£ E'.DCr 

£ E NU I f 

£ Rr«C IILYT f R h !' A T n F L , 5 t£0R0 i'TO: G L R D r T , 1/TVAL, F A AT Y F , SUETYP 


t • 
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r.5 

?, 7 


7-' 

7D 

7- c 

7D 

• r 

751 

75? 

7L: 

754 

?:s 

’56 

75’ 

7 c r 

75 ? 
7c" 
7*.’ 
7c? 
7t 7 
74 4 
7c5 
764 
76- 
7i£ 
7c? 

77 n 

77’ 

772 

772 
774 

773 
776 
77’ 
7 7 £ 
779 

7 v rt 

7i 1 
7 -.2 
7C 7 
7fc4 
7s5 
’ c 6 
7w’ 
7s 7 
7' ’ 
70- 
7,1 
7 9’ 
TiZ 
704 
79? 
706 
79’ 


i f ( r v. c !T (it, 1*, 1‘, IX, 12 i ?X , i:> >3 

: <ljf ,.E 2tT T G A S' C TH E Fi H S A CE R I*. P A f C A T„ F L . , of.’E LAY OF CATA r,AS 

C _Ct« 7RCCC3£C5>) 

; I F E lit OF i Afi r A TA F L . t EE? E N C F 1 L FtAf TO "Y' 1 ARC EXIT < K E TUfvK J 

1 I' FUTVF * 1 

; TI-:>. it T I.EXTC1 TO M" 

v roc co 

C RETUnN 

c 


c 

i 

c 


CODE 


FLO F.OL 71 1. E CRI-.FS2 


l 

t 


34 : 

23 ? 

7 c: 

3?" 

jlc 

7 5 : 

4 :: 

, 2 * 



J c 


7 T 


“LOCAL BE CLARATUJNS “ 

If, TEGE fi CLCJXT, SO l VLN , S J NR EC ,SOT SEC ,S KElUO , EC UHSZ ,CI;Ti COL, SlfETYF 
UAL -CATTf,, $E H3K, IDLE 


» • C t Ob AL BE 
II.TiGE 4 
II. TEGE R 
If, TEGE R 
I f, TEGE R 
REAL 
RE AL 

ChARAC T£ A 
C OfU'Oh 
CCfU'Cf. 

C Of'KOh 
COMMON 
CGf'f'ON 
COMBOS 


.n«wnifrpn> » > 

TJK'cOI, ,7 JKEOf 
S’ L’l C E V t C EPf'E P 
NIJP CPU, B SAINT 
FEPFUJ , ELFT1P 
RTrPRG, CpCPR G 
BEVCE F < 55 ,4) * 
PEP f UJ , P API'S , 
PA A T YP * E l X BAT 
NlTCPU, CXLEVL 
COMMEM , T I F E P 
CPOPRC,!! AT’AG , 
tM C R S T 


,BLXCAT ,1 f.TVAL ,CPUCMT,PROC NK<4) , TOTH EM 
,TI FCNT ,R EX HEP ,E AC K M, C OHM EP , Tl PH EM , R ELSE" 
;,EATH£K,SLPCI.T ,E LB A T E , F A fi H E C 153 , CCeKAX 
, I K , J M , I N 2 , 1 H 2 
,SYE1PL,T1PPRG, OtVCA TT59, 163 
i,BA7pRG,PROIDL ,.HSTAF Y<1C2) 
6,NIXTBY*1,eXLEVL*12,EhOFJ L*1 
CEVtEF,DEVDAT,MJMD£V,SAVCAl,CPU(NT«EhDFIL 
, I/JTVA L ,N EX TOY ,ELP T I P , P ROC Ml , TO TH Eh , CSK CN'T 
. ,Ti RE Of, ,T 1HECF ,T1 PC N T , S YS 1 0 L , R E XM EM , E X CP E u 
:,RE LMEK ,C EM**E M .BATSEH, SW’PC h T , T3 PPRG , fi TMPR G 
(3 LB ATE. PR Cl DL. HSTAfi Y .!(< .If! 1. 1N2 , J N3 . CBEHAX 


FORMAT (32 X,!?, IX, J3,17X«A1 J1 
FORMAT (21 X, 1 1 1, IX , 1113 

FORMAT ( 2 1 >, FM’.s, i X ,11 1 , IX ,f 11 .4 ,t9X , 111 , IX ,J1 1) 

F 0 K I' A T ( 21 X, J 1 1, IX , II 1 , 1X,1 11 ,1X, II 1 ,1 X , J1 1 ,1X , II 1 3 

format ( 2 1 >, F1 1 1 ‘ ,f 1 1. ?, ix , f ii . 2, ix , f 1 1 .2 ,1 x , f i 1 . :) 

FORPATUC11X, 12, fc'X,F11.4 I 

FORMAT (17),1 7 , IX, 1 11,1X, II 1,:5X, F11 ,4 ,1X, FI 1.4 ,1X ,1 11, 1X,ni) 

format ( l 6 , 1 x i J 4 , 1 > , , 7 x , l : I 

PnCCNMD = r 

p K OC AN ( 2 3 = '• 

Fh CC Kft ( 3 3 = - 
pJ-CCNMO r 
CrUCf.T ' r 

PRCiCL = *.C 

ClBIRT * IN TV AL 
BC .t, Cf. T-'i,AU:it EV 
t.0 - 1 : C JL =7,1 . 

C E V t A T l C M, CCD « ' . C 
CCS TI OLE 
COMTIUJi 

IF CPttTYF.EC.riJ T F El, 

«E„C U,i4D T CTF'fri , !,LH CFU , EX Lt VL 

: a j f 


SS£3S5 


B- 16 


7“,9 


f 1 *> 
r ■» 



c ^ l 


v». 


C 


: 1 ' 


ill 
£14 
?1 i 
ili 
£1 ” 
215 
S 17 

1 - i 
1 11 
££1 
e<! 

let- 

e ; c 

£i£ 
el" 
£ SS 
££9 
Si? 
£11 

£ 12 

2 7 f 

5 34 
£35 
£36 
£37 
S 35 
£39 
e*° 
£41 
£42 
£43 
£44 
£45 
£-6 


cf 1 


j j 
■. 1 


£54 


If UFARTYP, *<....) , ANC, (SUETir.ru.m lHtl, 

P=AC <4,35.3 T I v tCh ,T IrtfCf 

Ci.tlf 

If l(f AR Hr .1.. , .3 ,ANC. (SL’uTY f . E- , i 3 3 lHtl. 

hE47 I.,;'.! EuF1Jft,TjPtf»T, JY tlUL, H£*n« , E A C HE ^ 

f ,iC 3 f 

if uf'»«Tip,rc ,/ht. (suBTyr. ec .:) ) ihln 

KvAC U, C" .3 C CKrEf, Lm , tEflKEF' *3 A Tf< E K 1 SVPCI, T 

: t, r j f 

if uM*np, ft. :> ,m. <suci7YF.ec. o) ihsn 

»EAC T 1FRRG,RTMFRC,CI.CPFC, EATPRG,CHCRST 

If Ir'f'TIf ,tC ,33 TFtN 
CFLCNT ‘ CPL'CN' t 4 1 

REAC K,;’L) F L C AT * , PR 0 (!•»’ < CP t'C U 7) , I i L £ 

FSCJOL = PRC I CL 4 1CLF 

rf.CJf 

If (P4PTYF.EC.E3 TfEN 

4 5 AC < t , Cl) S CEVUN , S J N RE 0 , SO TR E ( 1 , SCATTK , S c XT 3 F , SRET3U C , 5 CUM S Z 
CO 4 1 ; CNT = 1 , fl LX LEV 

If ( <CS VDAT (CNT, 1 3 .E C.S DEV IN) 
t . C4. ( CEVD FT (CN7 ,23 .EC. SC FVUhJ 

£ .Cf. < C£VC FT C CNT » 2) .£<!. SC EvUNJ 

t .CF. < CEVD ATICNT, 4) .EC. SL sVUh) 

Z ,cr, < C E VO 4T (CNT , 13 3. EC, 5 CtVUN 3 

Z ,CF. ( DEVO AT(CNT , 14 3. £0,1 CEVUN 3 

f .Cf. (OEVC 4T (CNT, 15 J.EC.S CEVL'f. 3 

i .CF, (CEVC A T < C N T , 16 3, EG.E CEVUN3J ThEN 

CEVOAT <C M. ,7) = 0 EV D A T< CNT 1 7 > 4 £ I NR £ 0 
CEVPAT(CNT ,?) = D E V C AT ( CNT ,£ 3 4 SOTRtQ 
LEVC ATCC NT , c ) = 0 EVP A T ( CN T , 9 3 4 SCUMSZ 

CEVCAT (C {. 7,1ij3 = CEVC AT (CNT, 1C3 4 SRECUC 

CEVCAT<C NT ,11 3 = C E V t AT ( C N'T , 1 1 3 4 SEXTIf 

t E V P A T ( C N T 1 1 i, 3 = PEVD AT (CN'T, 17 3 4 SDATTP 

ENCIF 

4 1'“ CON TIN IE 

EN3JF 

PS AC(1 K1 , *2Ci 6f.J» k2CJ SLFD AT , JN'TVAL .PARTY F, SUE TYP 
If (PAPTYf.tC.C1J ViYTCY =■ *Y * 

If <INTVAL.EC .OLO 1N7) GC TC 33C 

Ch to 4 4 C 

42 r ENDfIL = * Y * 

4 4 " PL TURN 
E *. C 
C 

c 

c 

v 

C 

C ciifprCEt TC C C.'iP C T £ T F c NET ARY ARRAY UhlCF WILL L- E OOTPUTEC TO 

v SrH IE TO F Y . FILE 

C JNVOCA TJCh HtlHCP: CALL r 1 3 , D f E fK T 

( 

; f ILt / nECOPC REFERENCES: 

C FJL5 NAPS US i D EEC film ON 


tMRTNAr PAGE IS 
OF POOR quality: 


t c 
- 0 

t 

LOCAL VAR) AfcL tS ; 





1 1 1 

c 

NA. E 

TYPE 

C ESCR1 FTjON 



\ 

V 

T' vf 

/> i /• L 

TjMfcf converted tc 

REAL 

NUMBER 

^ i «* 

% 

T"CN 

„E AL 

TJMfwS C0S'VER T tC TC 

REAL 

NOME Eh 

9 4 

¥ 0 * 

l 

3 { S Y it N 

REAL 

TOTAL disk transfer 

TIMF 


A 

V. 

TC T e : fi 

■i £ rL 

TOTAL S Ui'iO E F OF REQUESTS 


..1 

i 

c t v t : • 

ft Z hL 

l CVICE TIME 



* * * 

i 

T’-LClS 

RE AL 

TRUE OLEoE LENGTH 



; . ■> 

f 

\ 

T'gSE s 

REAL 

TRUE SERVICE TIME 




c 

C I £ KC NT 

IN T 1 COMMON 

C OU*v‘TE R CT C JSSS UF 



• A 0 

f '.A 

k 

c 

LM T FlCh 





». ; *i 

c 







; . ■> 


ic9 
i 7 ' 
t 7 1 
i 7w 
£7! 
£74 
£7S 
£ 7 i 
£7? 
£7'’ 
£73 
it: 
£ £ 1 
£«£ 
Si- 
ce 4 
£ £ 5 
eii 
ci? 
ci « 
£L9 

£*t 

S>1 
£ >7 
sc: 

• ? 4 

sss 

- S9£ 

547 
£93 
i 9 "• 
?:* 
9.1 
9. ’ 
9 . T 
9 1.4 
9.5 
9; i 
9.7 
9 . : 
9.9 
91 " 
911 


i IMTliuIiS ALL ELEMENTS tf HSTAR1 AFh AY TO - 1 . C r SYMBOL Cf MI SSI KG CAT A 
C CONVERT llMECS F FiCM SE C • TO Hf, REPRESENTATION, RESULT IS TMON 

CCSVSPT TIf'EOf FRCP* SEC. TC HF. REPRESENTATION, RESULT IS TMOF 

C (UOJOST FOR FAILURE Tc RESET Sir AFTEF ’4 HOURS) ) 

C SET hSTAAYM) 10 TMON MRUS SUM EE K OF HRE. PAST 24 HRS. 

C SET HSTARY(J) TO TMOF MINUS SUM EE R OF HRS. PAST 24 HRS. 

C COMPUTE CATE Ct 1Mb DA 1 LEING PROCESSED 3 S' THE F OR M YYMM.Ofi FROM SAVOAT 
l ASC TMON A Fit CAVE 3f. FSTAnYlZ) 

C UHES'CE FOPTH ELEWEhTE CF HSTAR1 ARR AY H1LLCE REFERENCED AS THREE 
C FILS THE A fi fi A 1 COUNTER TO TAKE II, TO ACCOUNT THE THREE ELEMENTS ALREADY 
C CREATED)! 

C 3f FARVStl) HAL U E bN SET TO A C IE FILE NO., SO LCNoCR fcC TO C 

C THE t COMPUTE T I F ThRUPLT AS THE 0UcT3 ENT OF TIP TRANSACTION COUNT, 

C TIFCST, ASC ELAFSiC TIME, E L p T 3 Pi , RESULT IN HSTAP Y CPA RMS ( 1 3 •* Z) 

C 2ND If 

C 3 F FARM,E<2) MAC BE.bN SET TO A CC6 F3LE NO., NO LONGER EQ TO 2 
C THEN SET HSTARMPAhMSCclA!) TC AVERAGE HUMEEfi OF DEMAND JOES )S MEMORY, 

C CMC PPG 
C 5 7-0 IF 

C 3 F FA FK S ( 2) hAS t E E\ SET TO A C Cfe FILE NC., SO LONGER EC TO L 

C THEN SET H S T A P Y CP « Ft". S { : HI 3 TC AVERAGE SUMEEh CF EA TCH PROGFAMS IN 

C MEMORY, BA TP ? L 

c it c :f 

C )f F „ c 7 $ 1 4 ) HAE SEES SET TO A C CE FILE S'C., SO LONGER EQ TO C, 

C THEN SET HSTAfi KPARMSC A )m?) TO AVERAGE S'Uf'bER Of REAL T 3 HE PROGRAMS 
C I*. MEMORY, R T !' F R G 
C END I F 

C If F A R M S < 5 1 H A 1 DEES’ SET TO A C Cc FILE NO,, SO LONGER EQ TO 0 . 

C 7 HE f 

C ((I-.Anc SURE CIVJilCS F'Y i ER C COES NOT HAPPEN)) 

C IF TIFCST 1. 1 2ERC 

C THEN COKPUTt TIP REIFCf.SE TJ HE AS <TIF C RG » ELPTJM) / T1FCNT, 

C RESULT Jf. hSTAST (FARMS (F) AD 

C ESC If 

: lncif 

C ;f C, s ( £ : H $ tftN £ c T Tv, A C Cu FILE NO., SO LONGER EQ TO 

1 HE 1 ojTARt (? AFVEfclA; ) - SHOPS T C C E " A iV E RESPONSE TIME) 

C END If 

: If f n F ; i E ( 7 } nil LEES SET TCi * C Cb FILE S'C., NO LONGER EC TO . 

v THE F CC v fUTE CFL’ L'TILl 2ATI0S AS 1-'u ’ ( 1 - < tSY S 1 D LA P FCI C L 3 / C PU Cfv 1‘ 3 / 

C ELFT3.N), RESLLY I f v HS TArY(PARMS(7)-*b ) 

C END IF 

C If RAR,-.J<£) HA! LE.ES SET TO A CIS f!_t N L , , NO LONoSR EC TC i 



P'A'GE is; 
OF POnr? or;^^ rT Y 


91 7 
■ i* 

917 

r • ^ 

7 *• 

C w 1 

9 1 2 
is* 
?M 
9i.f 
9E6 
5-7 
9iS 
9 t 9 
9 2 ^ 

5 :i 

9:2 

913 
9 24 
92 5 
926 
92’ 
9ir 
92“ 
9-' 1 

941 

942 
9 42 
944 
94' 
94‘ 
94’ 
94“ 
949 

9 S'* 
?;1 
952 
9 5’ 
9'4 
9 5 K 
956 
9 5’ 
?;;S 
9 5 9 
c t* 
“Li 
94’ 
9 l: 

9 1 4 

9 c: 
9 1‘ 
Vi" 
9c* 


L 

V 

V 

c 

c 

h 

c 

c 

c 

c 

c 

( 


c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

t 

c 

c 

c 


c 

c 

c 

c 

c 

c 

c 

f 

i 

r 

c 

r 


c 


l 


m* t w " MJ 1 ? rt"gn uTUlZATKN At (F fc>p.sr-«t> C KfU 0 M F‘EM TlP^c'*-* 

-EL>= 7 . + tEh “i tC AT>., f ,-0 /RTMEM , RESUi .1 U N 3 T A fi Y (PA RMS <s I * 1 ) 

*. * c : r 

IF FAR! SI?) ha: L-St!. SET T 0 A CCD FILE NO., NC L CU C E R EC TO 
THEN CuRUI' TIE S»AP RATE A< SVECNT / ELP 1 IU, RESuLT IN 
H3 T„ (. V ( PS 4 "5 ( r ) 1 ’ ) 

♦ * J J f 

"if "pRSKSl 1 l) HAS (?e£N SET TC A C C t FILE NC . , f. C LONGER ED TC ‘ 

THEF 

INITIALIZE TOTAL DISK TRANSFER TIKE, DS hTHN , TO 2 
INITIALIZE El EK COUNTER, CSKCNT, TC ZiRC 
< (C ALCULATt TOTAL t! 5 K TRANSFER TIME)) 

CC FCF C‘)T=T TC TOTAL NjF'bER OF DEVICES , NUMDEV, 

IF (DATA TTPE IN’ < CEV DE t < CNT , 4 ) IS "CSNUL") AND CICSTAT, 

C c VD A t ( CN T, fi 3 , IS UP, EQ TC 1 ) 

THEN 

AC D TC DSKTRN THE NEW CATA TRANSFER TIME IN D E VI AT ( t NT ■ 1 2 3 
INCREMENT CISk COuNTER, CSkCNT, E V .T 
END If 
tUt l Ci 

COMPUTE I/C ChANNEL IT 1 LIZAT 10 V AS ( t EK TRN* 0 . 5 * 1 Cu) / ELPT 1 P,, RESULT 
l ' 1 HITARtEf ARPSC 12 H 25 
END IF 

00 f Of C NT= 1 TC HUHDEV 

COMPUTE TOTAL F UP 3 E R OF REQUESTS, TOTREL, B Y SUMMING .INPUT REGUESTS , 
DFVDAT(CNT, 75 , ANO OUTPUT* R ECL'E ST S , DE 4 DAT (C NT , 83 
((COMPUTE DEVICE U T I Ll * AT 10 N/ Th RU PUT F CR DTV AND OTHER 1/0 DEVICES 
L'F JO 

IF ( SeVD £F t CNT, 4 l IS , CTV»L ,, 1 CR ( D C V D E f t C N T , 4 5 IS "DEVUL") 

A NS DtVCATlCNT.f J IS UP, EO TO 1 ) 

THEN COMPUTE DEVICE l T I L 1 Z AT ION/ TH RUPUT AS TQTREO DIVIDED El ELPT 1 M, 
RESULT IN HSTA R T (D C V CAT t CNT , 5 H!) 

ELSE CLEAR h ST A R T 1 0 E V C AT < C NT , 5 H 2 ) 

END! f 

((COMPUTE DEVICE UT 1 L 12 AT IOR/THPUPUT F CR FfcPS UP J J 
IF I DEVC Ef < CNT, 4 ) IS" FEFWL" J 
TnEN 

IF (BEVCATCCI, T,i J IS UP, EC TC 1 ) 

THEN CCMFUTE CEVI.CE UTIL. THRUPUT ; < -TOT R EC *F fc Pf U J 5 / ELFTIM, 

RESULT IF. HiTAfi ><CCVCAT<CM,SH 3 ) 

ELSE CLEAR KSTAR 1 (LEVCATt C.NT , 5 ) 4 2 ) 

E N'DIF 
£ ND 1 F 

((CORFU TE DEVICE U 1 ILI Z AT ICJ/THRUPUT F CP DISKS UP)) 

IF DEvCEf (CNT, 4 ) IS *£SkUL" 

THEN 

IF Cc VC A H CNT , £5 IS UP , EC TO 1 
THEN 

CO"FLTE CtVICC 11 KC, CEV’l", AS S LF OF EXISTENCE TIME, 

D C VD AT (CN T, 1 1 1 , AND DATA TRANSFER TIME , L E VD A T ( C N T , 1 * ) 

IF t TOTAL F.U'ILEF Of FEfL'SSTS , TOTrEu, Nt u) AND (NUKFEF OF 
i?I LCSTS CoELil, Dt Vt AT < CNT ,1 “ I , Nt *.' ) 

THE.. C AL f UL /. T £ TPJL "U SUE LENGTH, THUD L N, AS 
1 4 ( C £ V D A T < CNT , V 5 / (0 EV C AT( CNT, 1 21-1 3 7 *< D £ VC AT (CNT, 1 o) /TOTREO ) 

ELSE SET IFoCLI. TC AS CUEUE IS t f ■ F T 1 
E N D I f 

IF TCTFLC Ns . 


C 

c 
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ORIGINAL PACK ii, 
OR POOR QUALITY 



5 . • 

57* 

S’l 


> i ' 

S"« 

w: 

w. 

977 

57 r 

57* 

$ 4** 

CO 

?.■' 

SO 

sir 

5t6 

5c’ 

-50 

5 C S 

55* 

591 

??: 

553 

554 

555 

556 
?57 
955 
5 59 

oc: 


5*4 

:.s 


r, - C 
^ w 

I 19 

'.’11 
r > * 
w 1 ; 

: 1 : 
cu 

CIO 
: 16 
:i 7 

;r 

"19 

• • 1 

il 1 


1 Thf.S trout* Ut 5 5 f- 5 i c u tjve, tflecf., as cevhe T3HE, levt]", 

0 t : V I : £ £ i!> T >• E fiUC’llEFT Uf TOTAEL «SL TRUCLN 

. ELfE CLs«n !USJ 

c c„:jf 

. CCPLIF ’■•’VKt L T S Li?ATlCN/TKRIJPU 1 , HS TAR 1 (t E \C AT ( ( I, T , 5 ) * i 3 , IS 

1 i *: » tc tf:c < thus f r / elf tjm 

: u Lit CLEAR MLTrtF IUEVCaK E'iT,S) *33 

1 . ‘.£ J f 

l Ei.tir 
C t'DLC 
C AETLRI, 

V 

c 

l - - 

C CCCE 

C - : 

Subroutine cfkfrj 
t 

(. ‘ * LCC AL C E C L Aft A 73 ON $ * * 

INTEGER C f. T 1 1 

St AL TPOf , T^ON , CSKTRH,T CTPEG, CEVTI F ,TRUGLN , TRUSS R 
C “OlOEAL DECLAR.bTJOAS •• 

UTEGE s SAVE AT, FA HTTP ,GL At AT ,1 NTVAL ,CPUC f.’T , PR OC NK< 4) , TCTME U 

INTEGE R TO'eOlv , TIMEu f ,T1 FCf.’T ,R EA -'EM ,£XC h£K,C 0«I'EH,T1 PK EK , FvELFEM 

HtTEGl s M U“ C E V , C EMPE F , E A THEM , S UP C N T ,B LBA TE , P A RM S ( 1 5 1 , C CfcM A A 

IliTEGE R NO* CPU, CSKCNT ,1U ,JN1 ,1 N2 , JNZ 

SEAL FEPfUJ, tLFTlP,SYSiCL r TJPPRG f CEVD»T(99,UJ 

REAL «T*4PKGt E-KEPh C,C-A TFPOiF KOI OL >( 1 C23 

Ch A RAC TE P DEVDE F < 55 ,4) *6 ,N EATtT* 1 , EXL EVL*12 ,ENCf 1 L* 1 

C-MhOfi FEPfUJ , PALMS , DEV CEF,DE VD AT, RUMDEV,SA VC A 1, CPI CNT, END f JL 

CL mi. PART TP , EL AC AT ,JN7VAL ,N EX T 0 V ,EtP T I M , PROC A* ,TO TK EH , U SK CNT 

COMMON NUMCPU, t ALEV L ,TI FECN ,T IK EOF ,T1PCNT, S IS 10L,RE AN E* , EAC^E* 

C jMAON corn EM, T IFMEF ,RE LMEM ,D EMM EM ,D A TM E K, S WPC f»T , TI PP c <- , nTMFRG 

CuMl-OI, CnOPRG.E ATPR6 ,BL.O ATE ,PAC1 CL.HSTARY ,JN ,IM, 1NL, 1N2, CCbPAA 
C L M NCN tMRRST 

c 

ro 45 0 i = i , i r 2 

H S T 4 R Y( I) = -1.L 
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IF IUEVCEF <CRT,4) ,£ C. *CSk UL*3 
♦ ARC. (CE VC A 71 CUT, 4) .Et.m THE h 
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EI.OIF 

CO 510 CfMMiNUflDEV 

IF UDEVDEMCN r , O . £0 . ' CTVUL* J 
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CONTINUE 
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Yl 6 A = lfIX(lDATE7l r .) 

LE Ar - Y TAR / 4, . 

r ‘c v = LEAP - IF 1) (LEAH) 

if (f:m,lt...::ii calncrk) = i, 
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